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THE INFOPMATION IN THIS DOCUMENT IS SUBJECT TO CHANGE WITHOUT 
NOTICE AND SHOtLD NOT BE COWSTRUED AS A COMMITMENT BY DIGITAL 
EQUIPMENT CORPORATION. DIGITAL EQUIPMENT CORPORATION ASSUMES NO 
RESPONSIBILITY TOR ANY ERRORS THAT MAY APPEAR IN THIS DOCUMENT. 
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riRST RELEASE 
CORfVECTZONS MADE TQi 

1. CORRECT VECTOR AREA MAINTENANCE PROBLEM 

TURN CACHE MEMORY SYSTEM OFF DURING NON -CACHE TESTS, 
ENSURE THAT CPU ERROR REGISTER IS CLEARED AFTER 
COMPLETION OF TEST THAT MIGHT CAUSE IT TO BE SET, 
SAVE PC AND CONTENTS OF R6 ON UNEXPECTED INTERRUPTS 
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,j .REM £ 

72 

73 1.0 GfcNERAL INFORMATION 
74 

75 1.1 PROGRAM ABSTRACT 

5? THIS IS AN APT COMPATIBLE VERSION OF THE KQJll FLOATING POINT 

78 INSTRUCTION TESTS. IT FOCUSES ON TESTING THE KOJll FLOATING POINT 

79 INSTRUCTION FUNCTIONALITY. 
60 

81 1.2 SYSTEM REQUIREMENTS 

83 KDJll-A PROCESSOR MODULE 

g4 ENSURE THAT MALT TRAP OPTION IS DISABLED (JUMPER U9 INSTALLED) 

AS 32KW ?*l£fiOf^Y 

86 Q-22 BACKPLANE (18 BIT QBUS MAY BE USED WITH REDUCED TEST COVERAGE) 

SERIArLlNE UNIT AND COISSOLE TERMINAL (CONSOLE TERMINAL NOT REQUIRED FOR APT) 

88 

89 1.3 RELATED DOCUMENTS AND STANDARDS 

90 

91 KOJll -A MODULE SPECIFICATION REV 2.2 

92 PDPll MAINOEC SYSMAC PACKAGE 

95 JU CONTROL CHIP SPECIFICATION 21-17679-00 
94 Jll DATA CHIP SPECIFICATION 21-17677-00 

95 

96 1.4 DIAGNOSTIC MIERARCY PREREQUISITES 

98 THE KOJll CPU AND MEMORY MANAGEMENT DIAGNOSTICS MUST 

99 RUN SUCCESSFULLY PRIOR TO RUNNING THE FLOATING POINT 

100 TESTS. 
101 

102 1.5 ASSUMPTIONS 

104 IT IS ASSUMED THAT THE DIAGNOSTIC OPERATOR IS FAMILIAR WITH 

105 THE XXOP* OPERATING SYSTEM AND THE Jll MICRO-ODT. 

106 

107 2.0 OPERATING INSTRUCTIONS 
108 

109 2.1 LOADING AND STARTING PROCEEDURE 
110 

111 LOAD PROGRAM INTO MEMORY USING STANDARD XXDP» PROCEEDURE S . 

112 THE PROGRAM IS STARTED BY LOADING ADDRESS 200 AND USING 

113 THE Jll MICRO-OOT G COMMAND TO START. THE PROGRAM 

114 IDENTIFICATION MESSAGE WILL BE TYPED AFTER THE FIRST PASS 

115 OF THE COMPLETE PROGRAM. 
116 

117 2.2 PROGRAM OPTIONS 

lie 

119 THE FOLLOWING ASSIGNMENTS HAVE BEEN MADE FOR THE KDJll-A 

120 DIAGNOSTIC SWTTCH REGISTER BITS: 
121 

122 BIT#15 14 IS 12 11 10 9 8 

[il DON'T 18 BIT EXTENDED 

125 TEST ADDRESS CACHE 

BEVENT ONLY TESTS 
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JfS THE SOFTWARE SWITCH REGISTER HAS NO EFFECT ON THE OPERATION OF 

130 THIS DIAGNOSTIC. 

[32 2.5 OPERATION UNDER APT 

ill THERE ARE NO ABNORMALITIES IN THE EXECUTION OF THIS DIAGNOSTIC 

Wt WHEN OPERATING IN AN APT ENVIRONMENT. PROBLEMS CAUSED BT THE 

III ASYNCHRONOUS HACtS OF THE DIAGNOSTIC Bt THE APT MONITOR HAVE 

137 NOT BEEN NOTED. 

138 

139 

140 3.0 ERROR INFORMATION 

}JJ ERRORS WILL CAUSE THE FOLLOWING ERROR MESSAGE TO BE PRINTED: 

\il ERROR DURING FPP TESTING 

{45 ERROR ♦ • (UNIQUE ERROR NUMBER) 

III ERROR PC - (PC AT TIME OF ERROR) 

}Je THE ERROR WILL THEN BE REPORTED TO APT AND THE PROGRAM 

149 WILL MALT. 

150 

151 4.0 PROGRESS REPORT 



153 AT THE END OF EACH PASS THE DIAGNOSTIC NAME AND PASS C(Mi1 ARE PRINTED. 

15- 6 
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SEQ O006 



.TITLE PROGRAM HEADER AND TABLES 
,S8TTL PROGRAM HEADER 

.MCALL NEUTST.ERROEF. .EQUAT. ,KT11, . »40CAT , , $EOP. , »APTBLS , SETUP 

. MCALL . $ T YPE . . » T YPDEC . ERRDr . BGNTST , ENDT ST . BGNMOD . ENDMQO . CKLOOP 

.MCALL .HEADER. .SETUP. . ITRAP.BGNSUB.ENDSUB. . tACTll . . tAPTHOR 

.MCALL . lAPTtPE . . »ERROR . . ITYPOCT . . »REA0 



.TITLE KOJll-A FLOATING POINT DIAGNOSTIC 

{•COPYRIGHT (C) OCTOBER. 1985 

J •DIGITAL EQUIPMENT CORP. 

(•MAYNARD. MASS. 01754 

J* 

«• 

•THIS PROGRAM UAS ASSEMBLED USING THE POP -11 MAINDEC SYSMAC 

•PACKAGE CMAIN0EC-110ZQAC-C5), JAN 19, 1977. 

* 

»TN-l 

tSUR-160000 iiHALT ON ERROR. LOOP ON TEST. INHIBIT ERROR TyPOUT 
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SEQ 0007 



001000 



000011 
000012 
000015 
000200 
177776 

177774 
177772 
177570 
177570 



000000 
000001 
000002 
000003 
000004 
000005 
000006 
000007 
000006 
000007 



000000 
000040 
000100 
000140 
000200 
000240 
000300 
000340 



100000 
040000 
020000 
010000 
004000 
002000 
001000 



.TITLE GLOBAL AREAS 

.SBTTL GLOBAl EQUATES SECTION 

I TME GLOBAL EQUATES SECTION CONTAINS PROGRAM EQUATES THAT 
s ARE USED IN MORE THAN ONE TEST. 

IsBTTL BASIC DEFINITIONS 

t*INITIAL ADDRESS OF THE STACK POINTER *•* 1000 
STACK- 1000 

.EQUIV EMT. ERROR j : BASIC DEFINITION OF ERROR CALL 

•EQUIV lOT. SCOPE i i BASIC DEFINITION OF SCOPE CALL 



I *MISCELLANEOUS 



MT. 
LF- 
CR- 
CRLF 
PS- 
.EGMJIV 
STKLMT" 
PIRU- 
OSUR- 
OOISP- 



11 
12 
15 
200 
177776 
PS.PSU 
177774 
177772 
177570 
177570 



DEFINITIONS 

tiCOOE 
; I CODE 
It CODE 
t I CODE 



FOR HORIZONTAL TAB 
FOR LINE FEED 
FOR CARRIAGE RETURN 

FOR CARRIAGE RETuRN-LINE FEED 

tiPPOCESSOR STATUS WORD 



{•GENERAL PURPOSE 

RO- HO 

Rl- «1 

R2> «2 

RS- «S 

R4- «4 

R5- «5 

R6- «6 

R7- «7 

SP- «6 

PC- «7 

t APRIORITY LEVEL 

PRO- 0 

PRl- 40 

PR2- 100 

PR3- 140 

PR4- 200 

PR5- 240 

PR6- 500 

PR7- 340 



1 1 STACK LIMIT REGISTER 
I (PROGRAM INTERRUPT REQUEST REGISTER 
llHARDUARE SWITCH REGISTER 
itHARDUARE DISPLAY REGISTER 

REGISTER DEFINITIONS 

llGENERAL REGISTER 
I (GENERAL REGISTER 
i (GENERAL REGISTER 
((GENERAL REGISTER 
((GENERAL REGISTER 
((GENERAL REGISTER 
((GENERAL REGISTER 
( (GENERAL REGISTER 
((STACK POINTER 
(iPROGRAN COUNTER 



DEFINITIONS 

((PRIORITY LEVEL 0 
((PRIORITY LEVEL 1 
((PRIORITY LEVEL 2 
((PRIORITY LEVEL 5 
((PRIORITY LEVEL 4 
((PRIORITY LEVEL 5 
((PRIORITY LEVEL 6 
((PRIORITY LEVEL 7 



(♦"SWITCH REGISTER" SWITCH DEFINITIONS 



SW15 
SW14 
SW13 
SW12 
SWll 
SWIO 
SW09 



100000 
40000 
20000 
10000 
4000 
2000 
1000 
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BASIC DEFINITIONS 


233 


000400 


SU08- 


400 


234 


000200 


SU07" 


200 


235 


000100 


SU06- 


100 


236 


000040 


SU05- 


40 


237 


000020 


SU04> 


20 


238 


000010 


SU03> 


10 


259 


000004 


SU02* 


4 


240 


000002 


SUOl* 


2 


241 


000001 


SUOO* 


1 


242 




.EQUIV 


SU09 . SU9 


243 




.EQUIV 


SU08 . SU8 


244 




.EQUIV 


SU07 , SU7 


245 




.EQUIV 


SU06 . SU6 


246 




.EQUIV 


SU05 , SU5 


247 




.EQUIV 


SW04.SU4 


248 




.EQUIV 


SU0S.SU3 


249 




.EQUIV 


SU02.SU2 


250 




.EQUIV 


SUOI.SUl 


251 




.EQUIV 


SUOO.SWO 


252 








253 




i*DATA BIT DEFINITIONS CBITOO TO BIT15) 


254 


100000 


BIT15- 


100000 


255 


040000 


BIT14- 


40000 


256 


020000 


BIT13- 


20000 


257 


010000 


BIT12- 


10000 


258 


004000 


BITll- 


4000 


259 


002000 


BITIO- 


2000 


260 


001000 


BIT09- 


1000 


261 


000400 


BIT06- 


400 


262 


000200 


BIT07* 


200 


263 


000100 


BIT06- 


100 


264 


000040 


BIT05- 


40 


265 


000020 


BIT04- 


20 


266 


000010 


BITOS- 


10 


267 


000004 


BIT02- 


4 


268 


000002 


BZTOl- 


2 


269 


000001 


BITOO- 


1 


270 




.EQUIV 


BIT09.BIT9 


271 




.EQUIV 


BXT06.BIT8 


272 




.EQUIV 


BIT07.BIT7 


273 




.EQUIV 


BIT06.BIT6 


274 




.EQUIV 


BZT0S.BIT5 


275 




.EQUIV 


BIT04,8ir4 


276 




.EQUIV 


BIT03.BIT3 


277 




.EQUIV 


BIT02.BIT2 


278 




.EQUIV 


BITOl.BITl 


279 




.EQUIV 


BITOO.Biro 


280 








281 




i*BASIC 


-CPU" TRAP VECTOR ADDRESSES 


282 


000004 


ERRVEC- 


4 it TIME OUT AND OTHER ERRORS 


283 


000010 


RESVEC- 


10 i {RESERVED AND ILLEGAL INSTRUCTIONS 


284 


000014 


TBITVEC 


■14 n' T" BIT 


285 


000014 


TRTVEC* 


14 it TRACE TRAP 


286 


000014 


BPTVEC- 


14 (iBREAKPOINT TRAP (BPT) 


287 


000020 


lOTVEC- 


20 1 1 INPUT /OUTPUT TRAP (lOT) aaSCOPE** 


288 


000024 


PURVEC- 


24 1 1 POWER FAIL 
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000030 


290 


000034 


291 


000060 


292 


000064 


293 


000240 


294 




295 




296 




297 




296 


0002S0 


299 




300 




301 




302 


177572 


303 


177574 


304 


177576 


305 


172516 


306 




307 




306 




309 


1''7600 


310 


177602 


311 


177604 


312 


177606 


313 


177610 


314 


177612 


315 


177614 


316 


177616 


317 


318 




319 




320 


177620 


321 


177622 


322 


177624 


323 


177626 


324 


177630 


325 


177632 


326 


177634 


327 


177636 


328 


329 




330 




331 


177640 


332 


177S42 


333 


177644 


334 


177646 


335 


177650 


336 


177652 


337 


177654 


338 


177656 


339 




340 




341 




542 


177660 


343 


177662 


344 


177664 
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SEQ 000'^ 



EMTVEC- 30 
TRAPVEC-34 
TKVEC- 60 
TPVEC- 64 
PIRQVEC-240 



.SBTTL MEMORY MANAGEMENT DEFINITIONS 
s*KTll VECTOR ADDRESS 
MMVEC- 250 

J*KTII STATUS REGISTER ADDRESSES 

SRO» 177572 
SRI- 177574 
SR2- 177576 
SR3- 172516 

!*USER "1" PA&E DESCRIPTOR REGISTERS 

UIPORO" 177600 
UIPORl- 177602 
UIP0R2- 177604 
UXPORS- 177606 
UIP0A4- 177610 
UIPDRS- 177612 
UIP0R6- 177614 
UIP0R7- 177616 

l*USCR "0" PKE DESCRIPTOR HEGISTORS 

UOPORO- 177620 
UDi>DRl> 177622 
U0PDIt2- 177624 
U0P0R3- 177626 
UDPDM- 177630 
UOPORS- 1776S2 
UDP0ft6- 1776S4 
UDP0R7- 177636 

i*USER "Z" PAGE ADDRESS REGISTERS 

UIPARO- 177640 
UIPARl- 177642 
UIPAR2* 177644 
UIPAR3- 177646 
UIPAR4> 177650 
UIPAR5" 177652 
UIPAR6- 177654 
UIPAR7- 177656 

I ♦USER "D" PAGE ADDRESS REGISTERS 

UDPARO- 177660 
UDPARl- 177662 
UDPAR2- 177664 



I EMULATOR TRAP (EMT) **ERROR** 
("TRAP" TRAP 
iTTY KEYBOARD VECTOR 
iTTY PRINTER VECTOR 
.PROGRAM INTERR'JPT REQUEST VECTOR 
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345 


177666 


346 


177670 


S47 


177672 


346 


177674 


349 


177676 


350 




351 




352 




353 


1 72200 


354 


1 72202 


355 


172204 


356 


172206 


357 


172210 


358 


172212 


359 


172214 


360 


172216 


361 




362 




363 




364 


172220 


365 


172222 


366 


172224 


367 


172226 


368 


172230 


369 


172232 


370 


1 72234 


571 


172236 


372 




373 




374 




375 


172240 


376 


172242 


377 


172244 


378 


172246 


379 


172250 


380 


172252 


381 


172254 


382 


172256 


383 




384 




385 




386 


172260 


387 


172262 


388 


172264 


389 


172266 


390 


172270 


391 


172272 


392 


172274 


393 


172276 


394 




395 




396 




397 


172300 


398 


172302 


399 


172304 


400 


172306 



Kl 
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U0PAR3- 177666 
UDPAR4- 177670 
UDPAR5- 177672 
U0PAR6- 177674 
U0PAR7- 177676 

;*SUPERVIS0R "I" PAGE DESCRIPTOR REGISTERS 

SIPORO- 172200 

SIPORl- 172202 

SIP0R2- 172204 

SIPDR5- 172206 

SIP0R4- 172210 

SIP0R5- 172212 

SIP0R6- 172214 

SIP0R7- 172216 

:*SUPERVIS0R "0" PAGE DESCRIPTOR REGISTERS 

SDPORO- 172220 
SDPORl- 172222 
SDP0R2- 172224 
SDP0R3- 172226 
S0PDR4- 172230 
S0PDR5- 172232 
S0P0R6- 172234 
SDP0R7- 172256 

i*SUPERVISOR "I" PAGE ADDRESS REGISTERS 

SIPARO- 172240 
SIPARl- 172242 
SIPAR2- 172244 
SIPAR5- 172246 
SIPAR4- 172250 
SIPARS* 172252 
SIPAR6- 172254 
SIPAR7- 172256 

:*SUPERVISOR "0" PAGE ADDRESS REGISTERS 

SDPARO" 172260 
SDPARl- 172262 
SDPAR2- 172264 
S0PAR3" 172266 
S0PAR4* 172270 
SDPAR5- 172272 
S0PAR6* 172274 
S0PAR7- 172276 

i*KERNEL "I" PAGE DESCRIPTOR REGISTERS 

KIPDRO- 172300 
KIPDRl- 172302 
KIPDR2- 172304 
KIPDR3- 172306 
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401 


172310 


KiPDR4» 172310 






KIPDR5- 172S12 


403 


172314 


KIPDR6- 172314 


404 


172316 


KIP0R7- 172316 


405 






406 




i»KERNEL "0" PAGE DESCRIPTOR REGISTERS 


407 
408 


172320 


KDPDRO- 172320 


409 


172322 


KDPDRl- 172322 


410 


172324 


KDPDR2- 172324 


411 


172326 


K0P0R3* 172326 


412 


172530 


KDPDR4- 172330 


41S 


172332 


K0PDR5- 172332 


414 


172334 


K0PDR6" 172334 


415 


172336 


KDPDR7> 172336 


416 






417 




i*KERNEL "I" PAGE ADDRESS REGISTERS 


418 






419 


172340 


KIPARO" 172340 


420 


172342 


KIPARl" 172342 


421 


172344 


KIPAR2" 172344 


422 


172346 


KIPAR3- 172346 


4?S 


172350 


KIPAR4" 172350 


424 


172352 


KIPAR5* 172352 


425 


172354 


KIPAR6- 172354 


426 


172356 


KIPAR7" 172356 


427 






428 




i*KERNEL "0" PAGE ADDRESS REGISTERS 


429 






430 


172360 


KOPARO- 172360 


431 


172362 


KOPARl" 172362 


432 


172364 


KDPAR2* 172364 


433 


172366 


KDPAR5- 172366 


434 


172370 


KDPAR4- 172370 


435 


172372 


KDPARS" 172372 


436 


172374 


KDPAft6> 172374 


437 


172376 


KDPAR7- 172376 


438 






459 




t THESE ARE FLOATING POINT ACCUMULATOR EQUATES 


440 


000000 


ACO- «0 


441 


000001 


ACl" *l 


442 


000002 


AC2- «2 


443 


000003 


ACS- US 


444 


000004 


AC4- «4 


445 


000005 


ACS- *5 


446 


000006 


AC6- «6 


447 


000007 


AC7" #7 


448 




449 


000244 


FPVEC" 244 


450 






451 




1 THESE ARE CACHE REGISTER EQUATES 


452 


177746 


CCR" 177746 iCACHE CONTROL REGISTER 


453 


177744 


USER- 177744 ir«MORY SYSTEM ERROR REGISTER 


454 


177752 


HITMIS- 177752 |HIT/HISS REGISTER 


455 


177766 


CPEREG- 177766 tCPU ERROR REGISTER 


456 
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KOJllA.MAC 

457 
458 
459 
460 
461 
462 
463 
464 
465 
466 
467 
468 
469 
470 
471 
472 
473 
474 
475 
476 
477 
478 
479 
480 
481 
482 
483 
484 
485 
486 
487 
488 



497 
498 
499 
500 
501 
502 
503 
504 
505 
506 
507 
508 
509 
510 
511 
512 
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177546 
177560 
177562 
177564 
177566 
000000 
000001 
000001 
002000 
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SEQ O012 



001000 
000000 



000000 



000200 000137 002200 



000046 
000052 



000204 
000046 
036362 
000052 
000000 
000204 



iMISCELANEOUS DEFINITIONS 



BE VENT- 177546 
RCSR- 177560 
RBUF" 177562 
XCSR- 177564 
XBUT- 177566 
ERRTN- HALT 
♦TSTNU-1 
ERRNUr-- 1 
AUSUR- 2000 



iBEVENT CONTROL REGISTER 



INITIALIZE ERROR NUMBER COUNTER 
iSUR FOR APT --NO BEVENT TESTING 



(THIS EQUATE DEFINES THE BOTTOM OF THE PROGRAM STACK POINTER 
STBOT" 1000 

.ASECT 

.SBTTL TRAP CATCHER 
.-0 

i*ALL UNUSED LOCATIONS OF* THE VECTOR AREA CONTAIN 

J ♦A ".♦2. lOT" SEQUENCE TO CATCH AW PROCESS ILLEGAL 

i*TRAPS AND INTERRUPTS THAT MIGHT OCCUR. 

I ♦THE lOT TRAP UMICH IS TAKEN ON THE ILLEGAL TRAP/INT 

}*TRAPS TO THE ISCOPE ROUTINE WHICH (IF THE RETURN PC IS 

:*LESS THAN 1002) JUMPS TO THE tERROR ROUTINE. 

l*THE tERROR ROUTINE WILL REPORT THE ERROR AS FOLLOWS: 

I* PC"YYYYtY UNEXPECTED TRAP TO XXX 

i*ANO RETURN TO THE PROGRAM AT PC-YYYYYY»2 

scWHERE XXX-LOCATION OF ILLEGAL TRAP 

J* YYYYYY-PC AT TIME OF TRAP 

{*NOTE: IF THE PROCESSOR IS NOT AN 11/05 THE PROGRAM 

I* CAN BE STARTED AT ADDRESS 0 AS WELL AS ADDRESS 200. 



489 


000000 


000000 


t40CAT: HALT 




kHALT 


490 


000002 


000737 


BR 


.-100 


llBRANCH TO 177700 C TIME OUT 


491 










»jll/Ob) 


492 


000004 


002200 


.WORD 


START 


itVECTOR TO STARTING ADDRESS 


493 


000006 


000340 


.WORD 


340 


iiWITH PRIORITY LEVEL 7 


494 




000174 


.-174 






495 


000174 


000000 


DISPREGt.WORD 


0 


II SOFTWARE DISPLAY REGISTER 


496 


000176 


000000 


SWREG; .WORD 


0 


i {SOFTWARE SWITCH REGISTER 



(NOT ON 



.SBTTL STARTING ADORES(ES} 

JMP S»START iiGO TO 
.SBTTL ACTll HOOKS 



START OF PROGRAM 



I HOOKS REQUIRED BY ACT II 
ISVPC-. 
.-46 
tENDAD 
.-52 

.WORD 0 
.-ISVPC 

.SBTTL APT PARAMETER BLOCK 



I SAVE PC 

ilDSET L0C.46 TO ADDRESS OF lENDAD IN 

i.2)SET L0C.52 TO ZERO 
It RESTORE PC 



$EOP 



:SET LOCATIONS 24 AND 44 AS REQUIRED FUR APT 



Ni 



GLOBAL 


AREAS 


MACYll 


KDJllA.MAC 


15 -MAR 84 


513 






514 




000204 


515 




000024 


516 


000024 


000200 


517 




000044 


518 


000044 


000204 


519 




000204 


520 






521 






522 






525 






524 


000204 






AAA ^ Ail 

000204 


000000 


526 


AAA''>A£ 

000206 


001000 


527 


AAA^ < A 

000210 


000001 


52B 


AAA^t ^ 

000212 


000002 


529 


AAAO 4 Jl 

000214 


000000 


530 


A A A^ < £ 

000216 


000014 






000204 


532 




000002 


533 


000002 


000000 


534 


000004 


0O0C06 


535 


000006 


000004 


536 




000204 


537 




001000 



15 MAR -84 16:58 PAGE 13 
APT PARAMETER BLOCK 



SEQ 0013 



.$X-. 1 1 SAVE CURRENT LOCATION 

.•24 ,;SET POWER FAIL TO POINT TO START OF PROGRAM 

200 jjFOR APT START UP 

.-44 it POINT TO APT INDIRECT ADDRESS PNTR. 

tAPTWR mPOINT to APT HEADER BLOCK 

.-.$X iiRESET LOCATION COUNTER 

{SETUP APT PARAMETER BLOCK AS DEFINED IN THE APT-POPll DIAGNOSTIC 
J INTERFACE SPEC. 



lAPTHO 

$HIBTS 

»MBAOR 

»TSTM: 

♦PASTM: 

lUNITM: 



0 
6 
4 



•2 



$X 



■.»X 
•1000 



.WORD 0 liTUO HIGH BITS OF 18 BIT MAILBOX ADDR. 

.WORD IMAIL jiADDRESS OF APT MAILBOX (BITS 0-15) 

.WORD 1 ; jRUN TIM OF LONGEST TEST 

.WORD 2 jiRUN TIME IN SECS, OF 1ST PASS ON 1 UNIT (QUICK VERIFY) 

.WORD 0 tiADDITIONAL RUN TIME (SECS) OF A PASS FOR EACH ADDITIONAL UNIT 

.WORD tETEN0-$MAIL/2 i t LENGTH MAILBOX -ETABLE( WORDS) 
:SAVE CURRENT LOCATION COUNT 



•.SET UP SOME VECTORS 
sRESTORE LOCATION COUNT 



GLOBAL ARE^S MACUl 50A( 
KOJllA.MAC ISMAR 84 IS: 

5S8 
5S«» 
540 
541 
542 
543 
54a 
545 
546 
547 

548 001000 

549 001000 000000 

550 001002 000000 

551 001004 000000 

552 001006 000000 

553 001010 000000 

554 001012 000000 

555 001014 000000 

556 001016 000000 

557 0C:020 

559 001020 000 

559 001021 000 

560 001022 000000 

561 001024 002000 

562 001026 000000 
563 

564 
565 
566 
567 
568 

569 001030 

570 

571 

572 

573 

574 

575 001030 000000 

576 001032 000000 
577 

578 

579 001034 000000 
58U 001036 000000 

581 001040 000000 

582 001042 000000 

583 001044 OOOOdO 

584 001046 177570 

585 001050 177570 

586 001052 OOOCOO 
587 

568 001054 000000 

589 001056 000000 

590 001060 000000 

591 001062 000000 

592 001064 OOOOOC 
593 



B2 



> MAR 84 16:58 PAGE 14 
GLOBAL DATA SECTION 



SEQ 0014 



.SBTTL GLOBAL DATA SECTION 

! THE GLOBAL DATA SECTION CONTAINS DATA THAT ARE USED 
I IN MORE THAN ONE TEST. 

! SBTTL APT MAILBOX -E TABLE 



.EVEN 

»MAIL : 

IMSGTY: 

IFATAL: 

♦TESTNi 

IPASS: 

lOEVCT: 

*UNIT: 

IMSGAD: 

IMSGLG: 

»E TABLE: 

lENV: 

»ENVM: 

tSUREG: 

tUSUR: 

•CPUOP: 

I* 

I* 

I* 

t* 

I* 

!♦ 

tETENO: 
.MEXIT 



.WORD 
.WORD 
.WORD 
.UOOO 
.UORD 
.WORD 
.WORD 
.WORD 

.BYTE 
.BTTE 
.WORD 
.WORD 
.WORD 



AMSGTY 

AFATAL 

ATESTN 

APASS 

AOEVCT 

AUNIT 

AMSGAO 

AMSGLG 

AENV 

AENVM 

ASUREG 

AUSUR 

ACPOOP 



I APT MAILBOX 

iMESSAGE TYPE CODE 

iFATAL ERROR NUMBER 

I TEST NUMBER 

iPASS COUNT 

I DEVICE COUNT 

I I/O UNIT NUMBER 

(MESSAGE ADDRESS 

iMESSAGE LENGTH 

I APT ENVIRONMENT TABLS 

lENVlRONMENT BYTE 

lENVlRO^tCNT MODE BITS 

lAPT SWITCH REGISTER 

I USER SWITCHES 

iCPU TYPE. OPTIONS 
BITS 15-ll-CPU TYPE 

11/04-01. 11/05-02. ll/20»03. 11/40-04. 11/45-05 
11/70-06. P0Q-07.Q-10 
BIT 10-REAL TIME CLOCK 
BIT 9-rLOATING POINT PROCESSOR 
BIT 8-MEMORY MANAGEMENT 



I THESE LOCATIONS ARE USED IN MORE THAN ONE TEST TO STORE V»^CTOR DATA 
(WHEN THE TEST NEEDS TO MAVE AN ERROR CONDITION RESPOND OIFrERENTLY 
I FROM THE DEFAULT RE SPONGE. 
SLOCOO: .WORD 0 
SLOCOl; .WORD 0 



I THESE 

EXPOAT 1 

RECDAT I 

COUNT: 

FLAG: 

ERRCNT I 

SWR: 

DISPLAY 

lERFLC: 

I THESE 

DCOUNT; 

ALLCTR: 

LOOP IN; 

SAVSPl i 

SAVSP21 



LOCATIONS ARE USED 
WORD 0 



.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 



O 
0 
0 

0 

DSWR 
DO ISP 
0 



LOCATIONS ARE USED 
.WORD 0 
.WORD 0 
.WORD 0 
.WORD 0 
.WORD 0 



in more than one test to store working data. 

•stores expected (good) data for comparisons 
i stores recieved data to be verified 
lerror indicator for floating point tests 
•used to store -flag" conditions 
i storage for error count 
(storage for switch register address 
(storage for display register address 
(error flag 

By more Than one test as loop coui^ters 



(STORAGE FOR L94EXPECTE0 TRAP DATA 
I 



ARLAb 
MAC 



15 



W44'?§^^r'^^ ^5 MAti:§8x m^r- 



c? 



SEQ O015 



5«M 

5<»5 



596 


001066 


000004 


BTEXP: 


.BLKU 


4 


59' 


001076 


000004 


BTRES: 


.BLKU 


4 


59« 


001106 


000004 


RECFEC: 


.BLKta 


4 


599 


001116 


000004 


RECST: 


.BLKU 


4 


600 


001126 


000004 


RECDST : 


.BLKU 


4 



601 
602 
60S 
604 
o05 
606 
607 
608 
609 



001 136 
001156 



•STORES EXPONENT DURING BIT TESTS 
iSTORES RECIEVED DATA FOR BIT TESTS 
iRECIEVEO FLOATING POINT EXCEPTION CODE 
iRECIEVED FLOATING POINT STATUS 
jOESTINATION ADDRESS FOR FLOATING POINT TESTS 



000020 



i!!!!!THIS IS IT. THE PROGRAM TEST LOCATION AND WRITE BiJFFER! !!!!!!!!••!!!•!! • 
TSTLOC: 

.BLKU 20 



GLOSAl ARtAS 
KOJllA.MAC 



MAC>11 SOAUOb^) 
15 -MAR 84 15:51 



IS MAR 84 16:58 PAGE 16 
APT MAILBOX E TABLE 



SEQ 0016 



610 001176 125456 

611 001200 000000 

612 001202 000000 
615 001204 000001 

614 001206 055555 

615 001210 177777 

616 001212 145671 
t>17 001214 100000 

618 001216 005000 

619 001220 125456 

620 001222 000000 
t>21 001224 000000 
622 001226 055555 
625 001250 177777 

624 001252 000000 

625 001254 000000 

626 001256 045245 

627 001240 000000 

628 001242 000000 

629 001244 000000 

650 001246 162400 

651 001250 000000 

652 001252 000000 
655 001254 000000 

654 001256 000000 

655 001260 000000 

656 001262 000000 

657 001264 000000 

658 001266 047050 

659 001270 010000 

640 001272 000000 

641 001274 000000 

642 001276 000200 
645 001500 000000 

644 001502 000000 

645 001304 000000 

646 001306 000200 

647 001310 000000 

648 001312 000000 

649 001314 000001 

650 001516 000400 000000 000000 

651 001324 000000 

652 001526 030000 
655 001330 003000 

654 001352 000000 

655 001334 000000 

656 001336 016400 

657 001340 000000 

658 001342 000000 

659 001344 000000 

660 001546 030000 003000 000002 

661 001554 000000 

662 001556 016100 000000 000000 
665 001364 000001 

664 001366 016200 

665 001570 000000 



TABl: 

TAB2: 

TAB5: 

TAB4: 

TAB5: 

TA85A: 

TAB6: 

TAB6A: 

TAB7: 

TABS: 

TAB9: 



.WORD 
.UORO 
.WORD 
.UORO 
.UORO 
.UORO 
.UORO 
.UORO 
.UORO 
.UORO 
.UORD 
.UORO 
.UORO 
.UORO 
.UORO 
.UORO 
.UORO 
.UORO 
.UORO 
.UORO 
.UORO 
.UORO 
.UORO 
.UORO 
.UORO 
.UORO 
.UORO 
.UORO 
.UORO 
.UORO 
.UORO 
.UORO 
.UORO 
.UORO 
.UORO 
.UORO 
.UORO 
.UORO 
.UORO 
.WORD 
.UORO 



TABIO: .UORO 
. UORO 
.UORO 
.UORO 

TABU: .UORO 
.UORO 
.UORO 
.UORO 

TABllA: .UORO 



125456 
000000 
0 
1 

055555 

177777 

145671 

100000 

005000 

125456 

0 

0 

55555 
-1 
0 
0 

45245 

0 
0 
0 

162400 

0 
0 
0 
0 
0 
0 
0 

47050 
10000 
0 
0 

200 
0 
0 
0 

200 
0 
0 
1 

400.0. 0.0 

30000 
3000 
0 
0 

16400 
0 
0 
0 

30000.5000.2.0 



TAB12; .UORO 16100.0.0.1 

TAB15; .UORO 16200 
.UORO 0 



GLOBAL AREAS 



MAC>11 S0A(105«?) 15 MAR 64 16:58 PAG 
_. MAILBOX ETA 



KOJllA. 


MAC 


LS-nAH 84 


15:51 




666 


001372 


000000 






667 


001574 


000001 






666 


001576 


030000 


003000 


OOOOOO 


669 


001404 


140000 






670 


001406 


050000 






671 


001410 


000000 






672 


001412 


oooooo 






675 


001414 


000000 






674 


001416 


024700 






675 


001420 


OOOOOO 






676 


001422 


OOOOOO 






677 


001424 


OOOOOO 






678 


001426 


025000 






679 


001450 


175565 






660 


001432 


125456 






681 


001434 


123456 






682 


001436 


0K V A A A A 

030000 






683 


001440 


AA '^A*%A 

007020 






684 


001442 


OOOOOO 


AAAAAA 

OOOOOO 




685 


001446 


023456 






686 


001450 


OOOOOO 






687 


001452 


OOOOOO 






688 


001454 


000001 






689 


001456 


100200 


OOOOOO 


A A^V^VA A 

OOOOOO 


690 


001464 


AAA AAA 

OOOOOO 






691 


001466 


m A^^ A 

100400 


OOOOOO 


AAAAAA 

OOOOOO 


692 


001474 


AA A>^A A 

OOOOOO 






693 


001476 


000200 


A AAA. A A 

OOOOOO 


OOOOOO 




001504 


^^AAAA # 

000001 






695 


001506 


062400 


OOOOOO 


OOOOOO 


696 


001514 


A ^^^^ J^^^^^ 

OOOOOO 








001516 


AA m • AA 

001100 


AAAAAA 

OOOOOO 


AAAAAA 

OOOOOO 


698 


001524 


OOOOOO 






699 


001526 


100600 


OOOOOO 


OOOOOO 


700 


001534 


OOOOOO 






701 


001536 


001000 


OOOOOO 


OOOOOO 


702 


001544 


OOOOOO 






703 


001546 


AAA^ AA 

000600 


OOOOOO 


OOOOOO 


704 


001554 


A A A A A A 

OOOOOO 






705 


001556 


010100 


OOOOOO 


OOOOOO 


706 


AA« ^ 

001564 


A A A^^^^A 

OOOOOO 






"7 r\ -f 

707 


001566 


010100 


OOOOOO 


002000 


70o 


AA« C 

001574 


OOOOOO 
















71v 


AA « e 

001576 


A A A^ A 

000500 


OOOOOO 


OOOOOO 


711 


001604 


OOOOOO 






'12 


AA 4 £ A£ 

OOloOo 


4 AAA AA 

100400 


OOOOOO 


4%^^ 

OOOOOO 


'13 


AA « ^ 4 A 

001614 


AAAAAA 

OOOOOO 








AA 4 £ * f 

OOlolo 


A 4 f AAA 

016000 


AAAAAA 

OOOOOO 


AAAAAA 

OOOOOO 


'Id 


AA % £.^M 

001624 


AAA AAA 

OOOOOO 






'16 


AA « £ ^£ 

001626 


011600 


AAAAAA 

OOOOOO 


AAAAAA 

OOOOOO 






U\AA/UO 






718 


001636 


000640 


OOOOOO 


OOOOOO 


719 


001644 


OOOOOO 






720 


001646 


077600 


OOOOOO 


OOOOOO 


721 


001654 


OOOOOO 







TAB138: 
TAB14: 

TAB15: 

TAB 16: 

TAB17: 
TAB 18: 

TA621: 
TA822: 
TA823: 
TAB24: 
TA825: 
TAB26: 
TAe27: 
TAB28: 
TAB29: 
TA829Ai 

TABSO: 
TA8S1: 
TAB32: 
TAB3S: 
TAB34: 
TAB40: 



.WORD 
.WORD 
.WORD 

.WORD 
.WORD 
.UORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.UORO 
.WORD 
.WORD 
.WORD 
.WORD 
.UORO 
.WORD 
.WORD 
.UORO 
.UORO 
.UORO 

.UORO 

.WORD 

.UORO 

.UORO 

.UORO 

.WORD 

.UORO 

.UORO 

.UORO 

.UORO 
.UORO 
.UORO 
.UORO 
.UORO 
.UORO 



E2 

17 



0 
1 

30000.3000.0.140000 

30000 
0 
0 
0 

24700 
0 
0 
0 

25000 

175565 

123456 

125456 

50000 

7020 

0,0 

25456 

0 

0 

1 

100200.0.0.0 

100400.0.0.0 

200.0.0.1 

62400.0.0.0 

1100. 0.0.0 

100600.0.0.0 

1000.0.0.0 

600.0.0.0 

lOlOO. 0.0.0 

10100.0,2000.0 



SOO.0.0,0 

100400.0.0.0 

16000,0.0.0 

11600.0.0,0 

640.0.0.0 

77600.0.0,0 



SEQ 0017 



f-2 



GLOB At. 
KDJllA 

722 
723 
724 
725 
726 
727 
728 
729 
730 
731 
732 
733 
734 
735 
736 
757 
738 
739 



ARC AS MACUl 30A(1052 
MAC 15 -MAR 84 15:51 



) 15 MAR 84 16:58 PAGE 18 
APT MAILBOX E TABLE 



SEQ no 16 



001656 
001664 
001666 
001674 
001676 
001704 
001706 
001714 
001716 
001724 
001726 
001734 
001736 
001744 
001746 
001754 
001756 
001764 



100200 
000001 
000340 
000000 
000077 
177776 
000577 
177777 
000577 
000000 
173737 
012346 
000000 
012346 
173737 
000000 
000600 
000000 



000000 
000000 
177777 
177777 
177777 
124242 
000000 
124242 
000000 



000000 TAB41: .UORO 

000000 TAB4?: .UORD 

177777 TAB45: .WORD 

177777 TAB45: .WORD 

000000 TAB46: .UORD 

052525 TAB47: .WORD 

052525 TAB47A: .WORD 

000000 TAB48: .WORD 

000000 TAB49: .UORD 



100200.0.0.1 
S40. 0.0.0 

77,177777.177777.177776 

577,-1.-1.-1 

577.-1,0.0 

173757 . 12424? . 052525 . 12546 
0.0.052525.12546 
175737.124242.0.0 
600.0.0.0 



G2 



GLOBAL AREAS 
KOJllA.hAC 



MACYll 30A(1052) 
15 MAR 84 15:51 



15 MAR 84 16i58 PAGE 19 
ICTION 



GLOBAL tEXT SEC 



SEQ 0019 



740 
741 
742 
743 
744 
745 
746 
74 7 
748 
749 
750 
751 
752 
753 
754 
755 
756 
757 
758 
759 
760 
761 
762 
763 
764 
765 
766 
767 
768 



.SBTTL GLOBAL TEXT SECTION 



i ♦ ♦ 



J THE GLOBAL TEXT SECTION CONTAINS FORMAT STATEMENTS, 
t MESSAGES, AND ASCII INFORMATION THAT ARE USED IN 
8 MORE THAN ONE TEST, 
i - - 



, FORMAT STATEMENTS USED IN PRINT CALLS 
i 



001766 


005015 


040503 


044103 


ERRMSG: 


: .ASCIZ 


<CR><LF> /CACHE 


SYSTEM 


001774 


020105 


054523 


052123 










002002 


046505 


042440 


051122 










002010 


051117 


000 












002013 


015 


042412 


051122 


FPPERR: 


.ASCIZ 


<CR><LF> /ERROR 


DURING 


002020 


051117 


042040 


051125 










002026 


047111 


020107 


050106 










002034 


020120 


042524 


052123 










002042 


047111 


000107 












002046 


005015 


051105 


047522 


ERRl: 


•ASCIZ 


<CR><LF> /ERROR 


♦ »/ 


002054 


020122 


020043 


000075 










002062 


005015 


051105 


047522 


EHR2: 


.ASCIZ 


<CR><LF> /ERROR 


PC •/ 


002070 


020122 


041520 


036440 










002076 


000 














002077 


015 


020012 


020040 


•CRLF : 


.ASCIZ 


<CR><LF>/ / 




002104 


000 
002106 








.EVEN 







1-2 

GLOBAL ARfAS MAC>11 30A(1052^ 15-MAR-84 16:58 PAGE 20 SEQ 0020 

KDJllA.MAC IS -MAR 84 15:51 GLOBAL ERROR REPORT SECTION 

769 .SB TIL GLOBAL ERROR REPORT SECTION 

770 

771 f 

772 i THE GLOBAL ERROR REPORT SECTION CONTAINS MESSAGE PRINTING AREAS 

773 ; USED BY MORE THAN TEST TO OUTPUT ADDITIONAL ERROR INFORMATION. 

774 , - - 
775 



002106 
002110 
002112 
002114 
002116 
002120 



002122 
002124 
002126 



GLOBAL AREAS 
KOjllA.MAC 



776 
777 
778 
779 
780 
781 
782 

■'as 

764 
785 
786 
787 
788 
789 
790 
791 
792 
793 
794 
795 
796 
797 
798 
799 
800 
801 
802 
803 
804 
805 
806 
807 
808 
809 
810 
811 
812 
813 
814 
815 
816 
817 
818 
819 
820 
821 
822 
823 
824 
825 
826 
827 
828 
829 
830 



MACtll 30A(1052) 
15 -MAR 84 15:51 



002130 
002132 
002134 
002142 

002146 
002150 
002152 
002160 
002164 
002166 
002170 
002172 
002174 
002176 



012600 
012605 
104000 
000001 
002013 
000110 



000000 
000207 
000207 



010446 
010146 

012767 000003 
000167 000012 

010446 
010146 

012767 000005 

005367 176654 

001402 

022421 

001773 

012601 

012604 

000207 



12 

15 -MAR -84 16:58 PACE 21 

GLOBAL SUBROUTINES SECTION 

.SBTTL GLOBAL SUBROUTINES SECTION 

1 THE GLOBAL SUBROUTINES SECTION CONTAINS THE SUBROUTINES 
t THAT ARE USED IN MORE THAN ONE TEST. 

i - - 



SEQ 0021 



176676 



176660 



,FPP COMMON SUBROUTINES 

WLDTRP: MOV (SP)».RO 

MOV (SP)*,R5 
ERROR 

.WORD 1 

.WORD FPPERR 

JMP (RO) 



TRPFLG: .WORD 0 
ERRFP: RTS R7 
ERR: RTS R7 



;SAVE PC 

I SAVE STATUS AND RESTORE STACK 
I ALL ERRORS TO TRAP TO EMT VECTOR 
iUNIQv€ ERROR NUMBER 
{ADDRESS OF ERROR MESSAGE 
iGO BACK INLINE 



SUBROUTINE DATA VERFICATION 
CALLED er JSR R7,0ATVER 



INPUT: 



(R4) -EXPECTED DATA 
(Rl)-RECEIVEO DATA 



THIS ROUTINE VERIFIES THAT THE 4 CCMSECTIVE WORDS STARTING WITH (R4) ARE 
EQUAL TO THE FOUR WORDS ADDRESSED BT (Rl). THE CONTENTS OF R4. AND Rl ARE NOT 
DISTURBED. 

LOCATION "COUNT" , IF NOT CttJAL TO 0 SIGNIFIES DATA ERROR 

IF THE STATUS IS FLOATING H(«)E, THE LAST TWO BtTES OF RECEIEVEO 

ARE SIMPLY CHECKED FOR ZEROS 



OATVFR: MOV 
MOV 
MOV 
JMP 

I 

DATVER: MOV 
MOV 
MOV 

DATl: DEC 
BEG 
CMP 
BEQ 

2»: MOV 
MOV 
RTS 



R4, (SP) 

r;.-(sp) 

*5. COUNT 
DAU 

R4.-(SP) 
Rl.-CSP 
*5. COUNT 
COUNT 
21 

(R4)».(R1)- 
DATl 

(SP)».R1 
CSP)»,R4 
R7 



tSAVE R4 

iSAVE Rl 
J SET UP ITERATION COUNT 



iSAVE R4 
{SAVE Rl 

;SET UP ITERATION COUNT 
I BRANCH IF DONE 



(RESTORE Rl 

(RESTORE R4 

(GO BACK TO CALLING ROUTINE 

I IF DATA ERROR. COUNT NE 0 



J2 



GLOBAL AREAS 
KOJllA.MAC 



851 
832 
833 
834 
835 
836 
837 
838 
839 
840 
841 
842 
843 
844 
845 
846 
847 
848 
849 
850 
851 
852 
853 
854 
855 
856 
857 
858 
859 
860 
861 
862 
863 
864 
865 
866 
867 
868 
869 
870 
871 
872 
873 
874 
875 
876 
877 
878 
879 
880 
881 
882 
863 
884 
885 
886 



MACYll 30A(1052) 
15-MAR 84 15:51 



OU2200 








002200 


012737 


000014 


177746 


002206 


012706 


AA i AAA 

vOlOOO 




002212 


012737 


040046 


000030 


002220 


012737 


AAATil A 

0OO340 


AAAA V ^ 

000032 


002226 


012737 


037530 


000034 


OOc234 


Olc f 3 f 


AAAVA A 
UUV340 


000030 


OOe<:4^ 


00!>0t> I 


1 f6540 




002^46 


016 lb 7 


AVil AC^ 




0022D4 


10306 f 






002260 


013746 


000004 






/M OTl"? 

Ulc r 3 r 




AAAAA^ 




A 1 O "TiL "7 
Ulc rO r 


1 f f D f U 






Ulc f O f 


if f D f V 


1 7£.i^ ^ 




A33777 


1 77777 






AA1 A1 ^ 






002316 


000403 






002320 


012716 


002326 




002324 


000002 






002326 


012767 


000176 


176512 


002334 


012767 


000174 


176506 


002342 


012637 


000004 





002346 
002352 
002360 
002362 
002370 
002370 
002376 
002404 
00P410 
002414 



002422 



005067 
132767 
001403 
012767 

012737 
012737 
005037 
005067 
012737 



176434 
000200 

001022 

040046 
000340 

177766 
176370 
000014 



15-MAR-84 16:58 PAGE 22 

GLOBAL SUBROUTINES SECTION 



START : 

MOV «14.S«CCR 
•SBTTL INITIALIZE THE COMMON TAGS 



SEQ 0022 



176441 

176456 

000020 
000022 

177746 



jSET CACHE ro FORCE MISS 



MOV 

I (INITIALIZE A 
MOV 
MOV 
MOV 
MOV 
CLR 
MOV 
CLR6 
It SIZE FOR A 
I (EQUAL TO A 
MOV 
MOV 
MOV 
MOV 
CMP 
BNE 



64$: 

65$: 
66$: 



BR 

MOV 
RTI 
MOV 
MOV 
MOV 



♦STACK. SP tiSETUP THE STACK POINTER 

FEU VECTORS 

«*ERR0R,8«EMTVEC i lEMT VECTOR FOR ERROR ROUTINE 
«340.S«EMTVEC»2 ii LEVEL 7 

«tTRAP.S«TRAPVEC iiTRAP VECTOR FOR TRAP CALLS 
«340.fi«TRAPVEC»2iLEVEL 7 
IPASS u CLEAR THE PASS COUNT 

»ENOCT,$EOPCT n SETUP END -OF -PROGRAM COUNTER 
$ERFLG It CLEAR THE ERROR FLAG 

HARDWARE SWITCH REGISTER. IF NOT FOUND OR IT IS 
"-1", SETUP FOR A SOFTWARE SWITCH REGISTER. 
0*CRRVEC.-(SP) i I SAVE ERROR VECTOR 

1 1 SET UP ERROR VECTOR 
it SETUP FOR A HARDWARE SWICH REGISTER 
1 1 AND A HARDWARE DISPLAY REGISTER 
mTRY TO REFERENCE HARDWARE SUR 
i (BRANCH IF NO TIMEOUT TRAP OCCURRED 
((AND THE HARDWARE SWR IS NOT > 1 
((BRANCH IF NO TIMEOUT 
I (SET UP FOR TRAP RETURN 

i (POINT TO SOFTWARE SUR 



«64t.B«ERRVEC 
«DSWR.SUR 
•DDI SP, DISPLAY 
0-1.8SUR 
66$ 

651 

«65$.(SP) 



«SUREG,SUR 
«DISPREG. DISPLAY 
(SP)».MERRVEC iiRESTORE ERROR VECTOR 



.MACRO «$SETMAIL 



?$ARC1 



$ARftl: 
.ENOH 



CLR $PASS 

BITB ♦APTSIZE.$ENVM 

BEQ $ARG1 

HOV •$SUREG.SUR 



((CLEAR PASS COUNT 

((TEST USER SIZE UNDER APT 

((YES. USE NON-APT SWITCH 

I (NO. USE APT SUITCH REGISTER 



$$SETMAIL 



CLR 
BITB 
BEQ 
MOV 

67$: 

MOV 
HOV 
CLR 

RESTART: CLR 
MOV 



♦PASS 

•APTSIZE,$ENVM 
67$ 

«$SUREG.SUR 

«$ERROR.a«IOTVEC 
#S40.MI0TVEC»2 
»#177766 
$TESTN 
•14.6KCR 



((CLEAR PASS COUNT 
1 1 TEST USER SIZE UNDER APT 
(t YES. USE NON-APT SUITCH 
t (NO. USE SUITCH REGISTER 

((SET UP lOT VECTORS 
I ; TO GO TO ERROR ROUTINE 
(CLEAR CPU ERROR REGISTER 
(RESET $TESTN TO ZERO 
(SET CACHE TO FORCE MISS 



! SBTTL FLOATING POINT TESTS 

! BEGIN FLOATING POINT TESTING 

I ******************************** 

MBTl: 

!*TEST 1 FPP REGISTER BIT TESTS 

I t *********************************************** 



GLOBAL ARE MS 
KDJllA.MAC 



MACtll 30A(1052) 
15 MAR 64 15:51 



15 MAR -84 
Tl 



16:58 PAGE 23 

FPP REGISTER BIT 



TESTS 



SEQ OCx' 



O O 1 






888 






889 






890 






891 






892 






893 






894 






895 




1 7001 1 


896 






897 


002432 


w xc * wc 


898 


002436 




899 


002442 




900 


002444 


174019 


901 


002446 




902 






903 


002452 


1 /0401 


904 


002454 


170402 


905 


002456 


170403 


906 


002460 


170404 


907 


002462 


170405 


908 






909 


002464 


010501 


910 


002466 


070127 


911 


002472 


062701 


912 


002476 




913 


002500 




914 


002504 


174067 


915 


002510 




916 


002514 




917 


002520 


174167 

X > ^ XW f 


918 


002524 




919 


0025S0 


1 79AA7 
X ' coo ' 


920 


002534 


1749#»7 


921 


002540 


0001<^7 
vwxo > 


922 


002544 


1797#>7 

X > C > V f 


923 


002550 


X f ■• JO 1 


924 


002554 


000167 


925 


002560 




926 


002564 


174004 


927 


002566 


172404 


928 


002570 


000167 


929 


002574 


179467 


930 


002600 


174005 


931 


002602 


172405 


932 


002604 


000167 

VW Xw ■ 


933 


002610 


026767 


934 


002616 


001014 


935 


002620 




936 


002626 


001010 


937 


002630 


026767 


938 


002636 


001004 


939 


002640 


026767 


940 


002646 


001403 


941 


002650 




942 


002650 


104000 



|R5-FPP POINTER 
Rl-TEMPORARY COUNTER 
R2-P0INTER TO EXPECTED DATA 
R3-P0INTER TO RECEIVED DATA 
R4 -ODD/EVEN COUNTER 







1 1 






TQTl « 
1 9 1 X • 






1 f O'SSO 








i TPCTM 








SETO 








MBT2: 


CLR 


R5 


001066 






MOU 
nu w 


1 C Ar* , Wc 


uwxu fo 






MDU 

*\\J w 








MBT2A' 


CLRD 












ArO fQ9') 
H^,w » V He ^ 




























n Rn 










ri RD 


Ar9 








CLRD 


ACS 








n Rn 










TLRn 












R^ RI 








HUL 


A1 A Ri 








ADD 


AMAPA RI 








IHP 


\ "1 } 


1 roOOc 




MACO* 


Lnn 


RTFXP Am 


X rOOOO 




MACOA : 


STO 


APO RTRFQ 


MW)A74 
W\AA/ 1^ 






JMP 




X rOw^O 




MACl • 






1 7AX«i9 
X roODc 






STD 


API ATRF^ 


wwov 






JMP 


MACF 


X ■ojjc 




MAC2* 


LOO 


RTFXP APO 


1 7AX^ 
X rOOOO 






^Tn 


APP RTRPC 








JMP 




1 7A^1 A 
X rOOXO 




MAC3* 


LOO 


OTCWC AP^ 


1 7AX99 
X rOOcc 






STD 


ACS BTRP^ 


wwvjw 






JHP 


MAPF 


176302 




f1AC4: 


LOO 


BTFXP APO 










APn APA 








LOD 


APA APO 


177710 
X ■ ■ ■ xv 






JHP 


HAPOA 


1 7<«9AA 
X rocoo 




NAC5: 


WW 


OTpyp APO 








STO 


ACO. AC5 








LOO 


ACS.ACO 


177674 






JMP 


MACOA 


176252 


176260 


MACE: 


CMP 


BTEXP.BTRES 








BNE 


BTER 


176244 


176252 




CMP 


BTEXP»2.BTRESt2 


176236 






BNE 


BTER 


176244 




CMP 


BTEXP»4.BTRESt4 








BNE 


BTER 


176230 


176236 




CMP 


BTEXP«6,BTRES*6 








BEQ 


MBT8 






BIER: 












ERROR 





J INCREMENT TEST NUMBER 

I SETUP FPP ACC POINTER 
jPOINT TO TEST DATA 
jPOINT TO RECEIVED DATA 
J SETUP FPP REGISTER VALUES 
I CLEAR EXPECTED VALUE 

t SETUP FPP REGISTER VALUES 



I GET FPP AC NUMBER INTO RI 
tALLOU 10 LOCATIONS FOR OPERATION 
I SETUP JMP LOCATION 



jLOAO TEST 
I SAVE TEST 
»GET OUT 
I LOAD TEST 
{SAVE TEST 
jGET OUT 
J LOAD TEST 
J SAVE TEST 
{GET OUT 
jLOAD TEST 
J SAVE TEST 
iGET OUT 



DATA INTO TEST REGISTER 
RESULT 

DATA INTO TEST REGISTER 
RESULT 

DATA INTO TEST REGISTER 
RESULT 

DATA INTO TEST REGISTER 
RESULT 



ILOAO TEST DATA INTO TEST REGISTER 
I SAVE TEST RESULT 
jGET OUT 

I LOAD TEST DATA INTO TEST XFER REGISTER 
iLOAO TEST REGISTER 

; STORE RESULT INTO XFER FPP REGISTER 
iGET OUT 

(BRANCH IF REGISTER ERROR 



I GOOD RESULT 

I ALL ERRORS TO TRAP TO EMT VECTOR 



GLOBAL 


AREAS 


MACtll 


30A(1052) 


KOJllA. 


.MAC 


15 MAR 84 


15:51 


943 


002652 


000002 




944 


002654 


002013 




945 








946 








947 


002656 






948 


002656 


005001 




949 


002660 


005705 




950 


002662 


001413 




951 


002664 


020527 


000004 


952 


002670 


100010 




953 


002672 


174067 


176200 


954 


002676 


004767 


000246 


955 


002702 


001403 




956 


002704 


104000 




957 


002706 


000003 




958 


002710 


002013 




959 








960 


002712 


020527 


000001 


961 


002716 


001410 




962 


002720 


174167 


176152 


963 


002724 


004767 


000220 


964 


002730 


001403 




965 


002732 


104000 




966 


002734 


000004 




967 


002736 


002013 




966 








969 


002740 


020527 


000002 


970 


002744 


001410 




971 


002746 


174267 


176124 


972 


002752 


004767 


000172 


973 


002756 


001403 




974 


002760 


104000 




975 


002762 


000005 




976 


002764 


002013 




977 








978 


002766 


020527 


000003 


979 


002772 


001410 




980 


002774 


174367 


176076 


981 


003000 


004767 


000144 


982 


003004 


001403 


983 


003006 


104000 




984 


003010 


000006 




985 


003012 


002013 




986 








987 


003014 


020527 


000004 


988 


003020 


001411 




989 


003022 


172404 




990 


003024 


174067 


176046 


991 


005030 


004767 


000114 


992 


003034 


001403 




993 


003036 


104000 




994 


003040 


000007 




9^)5 


003042 


002013 




996 








997 


003044 


020527 


000005 


998 


003050 


001411 





15 -MAR 84 
Tl 



16 



L2 



PAGE 24 
•P REGISTER BIT TESTS 



SEQ 0024 



iNOU VERIFY THE 
MBT8: 

CLR 

TST 

BEQ 

CMP 

BPL 

STO 

jsn 

BEQ 
ERROR 
.UORO 
.UORO 

MBT8A: CMP 
BEQ 
STO 
JSR 
BEQ 
ERROR 
.WORD 
.WORD 

MBT8B: CMP 
BEQ 
STO 
JSR 
BEQ 
ERROR 
.WORD 
.UORO 

MBT8C: CMP 
BEQ 
STO 
JSR 
BEQ 
ERROR 
.WORD 
.WORD 

MBTaO: CMP 
BEQ 

LOO 

STD 

JSR 

BEQ 

ERROR 

.WORD 

.WORD 



.WORD 2 t UNIQUE ERROR NUMBER 

.WORD FPPERR t ADDRESS OF ERROR MESSAGE 

iFPP AC LOADED INCORRECTLY 
OTHER REGISTERS REMAINED ZERO 



MBTSEi 



CMP 
BEQ 



Rl 
R5 

M8T8A 

R5.«4 

MBT8A 

ACO.BTRES 

R7,BTTST 

MBT8A 

3 

FPPERR 

R5.#l 

MBT8B 

ACl.BTRES 

R7.BTTST 

MBT8B 

4 

FPPERR 

R5.#2 

MBTSC 

AC2.BTRES 

R7,BTTST 

MBT8C 

5 

FPPERR 

R5,#3 

MBTSO 

AC5.BTRES 

R7,BTTST 

MBTeO 

6 

FPPERR 

R5.M 

MBTSE 

AC4.AC0 

ACO.BTRES 

R7.BTTST 

MBTSE 



FPPERR 

R5.#5 
MBT8F 



(BAD ACO 



iBAD ACl 



iBAD AC2 



J CLEAR TEMPORARY COUNTER 
I SEE IF RO UNDER TEST 
» BRANCH IF TEST ING RO 
J SEE IF TESTING FPP REGISTER >R4 
I SKIP RO TESTING 
;SAVE AC TEST RESULT 
I VERIFY THAT CONTENTS REMAINED ZERO 
I BRANCH IF EXPECTED RESULT 
I ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
I ADDRESS OF ERROR MESSAGE 

> 

sSEE IF Rl UNDER TEST 
(BRANCH IF Rl UNDER TEST 
(SAVE AC TEST RESULT 
S VERIFY THAT CONTENTS REMAINED ZERO 
{BRANCH IF OOQO 

J ALL ERRORS TO TRAP TO EMT VECTOR 
{UNIQUE ERROR NUWER 
t ADDRESS OF ERROR MESSAGE 

(SEE IF TESTING FPP REGISTER AC2 

(BRANCH IF R2 UNDER TEST 

(SAVE AC TEST RESULT 

(VERIFY THAT CONTENTS REMAINED ZERC 

{BRANCH IF GOOD 

{ALL ERRORS TO TRAP TO EMT VECTOR 
{UNIQUE ERROR NUMBER 
{AtM>RESS OF ERROR MESSAGE 



I BAD ACS 



(BAD AC4 



(SEE IF R3 UNDER TEST 
{BRANCH IF R3 UNDER TEST 
{SAVE AC TEST RESULT 
(VERIFY THAT CONTENTS REMAINED ZERO 
iBRMlCH IF GOOD 

(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
(A(X)RESS or ERROR MESSAGE 

\ 

(SEE IF R4 UNDER TEST 
{BRANCH IF R4 UNDER TEST 
(MOVE REGISTER CONTENT 
(SAVE AC TEST RESULT 
(VERIFY THAT CONTENTS REMAINED ZERO 
(BRANCH IF GOOD 

(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 

I 

{SEE IF RO UNDER TEST 
(BRANCH IF RO UNDER TEST 



GLOBAL ARC AS 
KOJllA.MAC 



MACni 30 A( 1052) 
15 -MAR 84 15:51 



15 MAR 84 
Tl 



'"^'-nP mS^h BIT 



M2 



TESTS 



SEQ O025 



999 


003052 


172405 






LOO 


AC5.AC0 


J MOVE REGISTER CONTENTS 


1000 


003054 


174067 


176016 




STO 


ACO.BTRES 


iSAVF AC TEST RESULT 


1001 


003060 


004767 


000064 




JSR 


R7, BTTST 


1 VERIFY THAT CONTENTS REMAINED ZERO 


1002 


003064 


001403 






BEQ 


MBiaF 


1 BRANCH IF GOOD 


1003 


003066 


104000 






ERROR 




|ALL ERRORS TO TRAP TO EMT VECTOR 


1004 


003070 


000010 






.WORD 


10 


1 UNIQUE ERROR NUMBER 


1005 


003072 


002013 






.WORD 


rPPERR 


(ADDRESS OF ERROR MESSAGE 


1006 














(BAD AC5 


1007 


003074 


005204 




MBTar ! 


INC 


R4 


(INCREMENT PATTERN COUNTER 


1008 


003076 


000241 






CLC 






1009 


003100 


042704 


177776 




6IC 


#177776, R4 


t TEST FOR ODD /EVEN 


1010 


003104 


001401 






BEO 


MBT8FG 


(BRANCH IF EVEN 


1011 


003106 


000261 






SEC 




(SET CARRY FOR TEST PATTERN SHIFT 


1012 


003110 


006112 




MBT8FG: 


ROL 


(R2) 


(ROTATE LSU OF TEST PATTERN 


1013 


003112 


006162 


000002 




ROL 


2CR2) 


(ROTATE 2 WORD OF TEST PATTERN 


1014 


003116 


006162 


000004 




ROL 


4(R2) 


(ROTATE 3 WORD OF TEST PATTERN 


1015 


003122 


006162 


000006 




ROL 


6(R2) 


(ROTATE 4 WORD OF TEST PATTERN 


1016 


003126 


103402 






BCS 


MBT8I 


(JUMP IF THROUGH WITH TEST PATTERN 


1017 


003130 


000167 


177314 




JMP 


BTGO 


(CONTINUE WITH NEW TEST PATTERN 


1018 
















1019 


003134 


005205 




MBT6I: 


INC 


R5 


(GO TO NEXT REGISTER TEST 


1020 


003136 


020527 


000006 




CMP 


R5,*6 


M ^ ^ ^r%na ul*a • ^ W V A 

(SEE IF THROUGH TESTING 


1021 


003142 


100016 






BPL 


MBTE 


(JUMP IF THROUGH 


1022 


003144 


000167 


177272 




JMP 


MBT2A 


i CONTINUE TESTING WITH NEW PATTERN 


1023 








t 








1024 








i 








1025 


003150 


005767 


175722 


BTTST: 


TST 


BTRES 


(VERIFY CONTENTS AS ZERO 


1026 


003154 


001010 






BNE 


BTTSTE 


(EXIT IF r«T ZERO 


1027 


003156 


005767 


175716 




TST 


BTRES*2 


(VERIFY CONTENTS AS ZERO 


1028 


003162 


001005 






BNE 


BTTSTE 


(EXIT IF NOT ZERO 


1029 


003164 


005767 


175712 




TST 


BTRES»4 


(VERIFY CONTENTS AS ZERO 


1030 


003170 


001002 






BNE 


BTTSTE 


(EXIT IF NOT ZERO 


1031 


003172 


005767 


175706 




TST 


BTRES *6 


(VERIFY CONTENTS AS ZERO 


1032 


003176 


000207 




BTTSTE: 


RTS 


R7 


(GO BACK TO CALLING ROUTINE 


1033 














1034 
















1035 










1 






1036 










1 






1037 


003200 






MBTE: 








1038 














1039 
















1040 


003200 






HFACU: 








1041 
















1042 








i*TEST 


2 


TEST UNIQUENESS 


OF FPP ACCUMULATORS 


1C>43 
















1044 








(THIS TEST LOADS UNIQUE PATTERNS INTO EACH ACCUHULATOR SIHULTANEOUSLi . 


1045 








tRS-POINTER TO EXPECTED DATA 




1046 








iRS'POINTER TO RECEIVED DATA 




1047 
















1 AAA 








TST2; 








1049 


003200 


005267 


175600 




INC 


ITESTN 


(INCREMENT TEST NUMBER 


1050 










1 






1051 










t 






1052 
















1053 


003204 


170011 






SETO 






1054 


00^206 


005000 




MFA} 


CLR 


RO 


(SETUP FPP ACC POINTER 



GLOBAL AREAS MACYll 30A(1C52) 15-MAR-84 16:56 I 
KDJllA.MAC 15 MAR-84 15:51 T2 TEST 



1055 


003210 


005004 








CLR 


1056 


003212 


012702 


001066 






MOV 


1CS7 


003216 


012703 


001076 






MOV 


1058 


003222 


012767 


000051 


175656 




MOV 


1059 


003230 


012767 


000052 


175652 




MOV 


1060 


003236 


012767 


000053 


175626 




MOV 


1061 


003244 


012767 


000054 


175622 




MOV 


1062 


003252 


172467 


175610 






LOD 


1063 


003256 


174005 








STD 


1064 


003260 


004567 


000240 






JSR 


1065 


003264 


172467 


175576 






LDD 


1066 


003270 


174004 








STD 


1067 


003272 


004567 


000226 






JSR 


1068 


003276 


172767 


175564 






LDD 


1069 


003302 


004567 


000216 






JSR 


1070 


003306 


172667 


175554 






LOD 


1071 


003312 


004567 


000206 






JSR 


1072 


003316 


172567 


175544 






LOD 


1075 


003322 


004567 


000176 






JSR 


1074 


003326 


172467 


175534 






LOO 


1075 














1076 


003332 


174067 


175540 






STO 


1077 


003336 


004567 


000246 






JSR 


1078 


003342 


001403 








BEQ 


1079 


003344 


104000 








ERROR 


1080 


003346 


000011 








.WORD 


1081 


003350 


002013 








.WORD 


1082 














1083 


003352 


004567 


000200 




BFACl: 


JSR 


1084 


003356 


174167 


175514 






STO 


1085 


003362 


004567 


000222 






JSR 


10«6 


003366 


001403 








BEQ 


1087 


003370 


104000 








ERROR 


1088 


003372 


000012 








.WORD 


1089 


003374 


002013 








.WORD 


1090 














1091 


003376 


0O4567 


000154 




BFAC2: 


JSR 


1092 


003402 


174267 


175470 






STO 


1093 


003406 


004567 


000176 






JSR 


1094 


003412 


001403 








BEQ 


1095 


003414 


104000 








ERROR 


1096 


003416 


000013 








.UORO 


1097 


003420 


002013 








.WORD 


1098 














1099 


003422 


004567 


000150 




BFAC5: 


JSR 


1100 


003426 


174367 


175444 






STO 


1101 


003432 


004567 


000152 






JSR 


1102 


003436 


001403 








BEQ 


1103 


003440 


104000 








ERROR 


1104 


003442 


000014 








.WORD 


1105 


003444 


002013 








.WORD 


1106 














1107 


003446 


004567 


000104 




BFAC4: 


JSR 


1108 


00W52 


172704 








LOO 


1109 


003454 


174567 


175416 






STO 


1110 


003460 


004567 


000124 






JSR 



N2 



E 26 

IQUENESS OF FPP ACCUMULATORS 



SEQ 0026 



R4 

«BTEXP.R2 

«6TRES.R3 

#51.BTEXP 

»52,BTEXP»2 

«53.BTEXP»4 

«S4.BTEXP*6 

BTEXP.ACO 

AC0.AC5 

RS.SUBT 

BTEXP.ACO 

AC0,AC4 

RS.SUBT 

BTEXP.AC3 

R5.SUBT 

BTEXP.AC2 

R5.SUBT 

BTEXP.ACl 

R5.SUBT 

BTEXP.ACO 

ACO.BTRES 

R5.BFA 

BFACl 

11 

FPPERR 

R5.AD0T 
ACl.BTRES 
R5.BFA 
BFAC2 

12 

FPPERR 

R5.ADDT 
AC2.BTRES 
R5.BFA 
BFAC5 

13 

FPPERR 

RS.AODT 
ACS.BTRES 
R5.BFA 
BFAC4 

14 

FPPERR 

R5,AD0T 
AC4,AC3 
ACS.BTRES 
R5,BFA 



iPOINT TO TEST DATA 

i POINT TO RECEIVED DATA 

(SETUP EXPECTED DATA 

I 

I 

i 

tMOVE DATA TEMPORARILY 

(PUT DATA INTO TEST REGISTER 

(SUBTRACT TEN FROM EACH EXPECTED DATA 

I MOVE DATA TEMPORARILY 

I MOVE DATA INTO TEST REGISTER 

I SUBTRACT 10 FROM TEST DATA UORDS 

J STORE INTO TEST REGISTER 

(GET NEXT SET OF UNIQUE DATA UORDS 

(STORE INTO TEST REGISTER 

jGET NEXT SET OF TEST OATAS 

I LOAD TEST REGISTER 

J GET NEXT SET OF TEST WORDS 

(LOAD FINAL TEST REGISTER 

(ALL REGISTER CONTAIN UNIQUE TEST UORDS 

I STORE ACO. RESULT 

(CHECK RESULT 

(BRANCH IF GOOD 

(ALL ERRORS TO TRAP TQ EMT VECTOR 
(UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 

(BAD ACO 

(UPDATE EXPECTED RESULT 
(STORE ACl RESULT 
(CHECK RESULT 
(BRANCH IF GOOD 

(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 
(BAD RESU.T ACl 

(UPDATE EXPECTED RESULT 
(ITORE AC2 RESULT 
(CHECK RESULT 
(BRANCH IF GOOD 

(ALL ERRORS TO TRAO TO EMT VECTOR 
(UNIQUE ERROR fAjr«ER 
(ADDRESS OF ERROR MESSAGE 
(BAD AC2 RESLUT 

(UPDATE EXPECTED RESULT 
(SAVE TEST RESULT 
(CHECK RESULT 
(BRANCH IF GOOD 

(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR r«JMBER 
(ADDRESS OF ERROR MESSAGE 
(BAD AC5 RESULT 

(UPDATE EXPECTED RESULT 
(SAVE TEMPORARY 
(STORE AC4 RESULT 
(CHECK RESULT 



GLOBAc AREAS MAC ill S0A(1052) 15 MAR 84 16:58 I 
KDJllA.MAC IS MAR 84 15:51 12 TEST 



1111 


003464 


001403 








BEQ 


111^ 


003466 


104000 








ERROR 


1115 


00S470 


000015 








.WORD 


1114 


003472 


002013 








.WORD 


1115 














1116 


003474 


004567 


000056 




BFAC5: 


JSR 


1117 


OOSSOO 


172605 








LDD 


1118 


00S!>02 


174267 


175370 






STO 


1119 


003506 


004567 


000076 






JSR 


1120 


003512 


001456 








BEQ 


lUl 


003514 


104000 








ERROR 


1122 


003516 


000016 








.UORO 


112S 


003520 


002013 








.UORO 


1124 














1125 


003522 


000452 








BR 


1126 














1127 


003524 


162767 


000010 


175334 


suet: 


SUB 


1128 


003532 


162767 


000010 


175330 




sue 


1129 


003540 


162767 


000010 


175324 




sue 


IISO 


003546 


162767 


000010 


175320 




sue 


1131 


003554 


000205 








RTS 


1132 


003556 


062767 


000010 


175302 


AOOT: 


AOO 


1133 


003564 


062767 


000010 


175276 




ADD 


1134 


0035/2 


062767 


000010 


175272 




AOO 


1135 


003600 


062767 


000010 


175266 




AOO 


1136 


003606 


000205 








RTS 


1137 














1138 


003610 


026767 


175252 


175260 


BFA: 


CMP 


1139 


003616 


001013 








BNE 


1140 


003620 


026767 


175244 


175252 




CMP 


1141 


003626 


001007 








BNE 


1142 


003630 


026767 


175236 


175244 




CMP 


1143 


003636 


001003 








BNE 


1144 


003640 


026767 


175230 


175236 




CMP 


1145 


003646 


000205 






BFB: 


RTS 


1146 














1147 














1148 


003650 








BFAE: 




1149 














1150 














1151 














1152 


003650 








TSFPl: 




1153 














1154 










l*TEST 


3 


1155 














1156 


003650 








TST3: 




1157 


003650 


005267 


175130 






INC 


1158 


003654 


005037 


002122 






CLR 


1159 


003660 


012704 


147757 






MOV 


1160 


003664 


004767 


000032 






JSR 


1161 


003670 


012704 


105252 






MOV 


1162 


003674 


004767 


000022 






JSR 


1163 


003700 


012704 


042505 






MOV 


1164 


003704 


004767 


000012 






JSR 


1165 


003710 


005004 








CLR 


1166 


003712 


004 767 


000004 






JSR 



B5 



E 27 

IQUENESS or FPP ACCUMULATORS 



SEQ 0027 



BFAC5 
15 

FPPERR 

R5.AD0T 
AC5.AC2 
AC2.BTRES 
R5.BFA 
BFAE 

16 

FPPERR 

BFAE 

♦lO.BTtXP 
*10.BTEXP»2 
♦10.BTEXP.4 
•10,BTEXP»6 

R5 

•lO.BTEXP 
•10.BTEXP*2 
♦lO.BTEXP. 4 
•lO.BTEXP »6 
R5 

BTEXP.BTRES 
BFB 

BTEXP»2.BTRES*2 
BFB 

BTEXP*4.BTRES*4 
BFB 

BTExP.6.6rRES>6 
R5 



•BRANCH IF GOOD 

I ALL ERRORS TO TRAP TO EMT VECTOR 
t UNIQUE ERROR NUMBER 
•ADDRESS OF ERROR MESSAGE 
jBAD AC4 RESULT 

I UPDATE EXPECTED RESULT 
I SAVE TEMPORARY COP< 
I MOVE ACS RESULT 
I CHECK RESULT 
I BRANCH IF GOOD 

I ALL ERRORS TO TRAP TO EMT VECTOR 
•UNIQUE ERROR NUMBER 
•ADDRESS OF ERROR MESSAGE 
I BAD ACS RESULT 

•EXIT MODULE 

•UPDATE EXPECTED CONTENTS 

•UPDATE EXPECTED CONTENTS 

•UPDATE EXPECTED CONTENTS 

•UPDATE EXPECTED CONTENTS 

* •UPDATE EXPECTED CONTENTS 

•UPDATE EXPECTED CONTENTS 
•UPDATE EXPECTED CONTENTS 
•UPDATE EXPECTED CONTENTS 



•VERIFY CONTENTS 

•EXIT IF NOT ZERO 

•VERIFY CONTENTS 

•EXIT IF NOT ZERO 

•VERIFY CONTENTS 

•EXIT IF NOT ZERO 

•VERIFY CONTENTS 

•GO BACK TO CALLING ROUTINE 



TEST LOFPS AND STFPS MODE 0 



ITESTN 
MTRPFLC 
♦147757. R4 
PC, LOST 
♦105252. R4 
PC.LOST 
♦42505. R4 
PC.LOST 
R4 

PC.LOST 



•INCREMENT TEST NUMBER 
•CLEAR TRAP FLAG 
•SETUP DATA TO BE LOADED 
•LOAD AND STORE FPS WITH DATA 
•SETUP DATA TO BE LOADED 
•LOAD AND STORE FPS UITH DATA 
•SETUP DATA TO BE LOADED 
•LOAD AND STORE FPS WITH DATA 
•SETUP DATA TO BE LOADED 
•LOAD AND STORE FPS WITH DATA 



GLOBAL ARMS MACtU 50A(105<>) 
KOJllrt.MAC 15 MAR 84 I5:5l 



1167 








llf>6 








1169 


003716 


000167 


000020 


1170 








1171 


003722 


170104 




1172 


003724 


170201 




1173 


003726 


020401 




1174 


003730 


001403 




1175 


003732 


104000 




1176 


003754 


000017 




1177 


003736 


002013 




1178 








1179 


003740 


000207 




1180 


003742 






1181 








1182 


003742 






1183 








1184 








1185 








1186 


003742 






1187 


003742 


005267 


175036 


1188 


003746 


005037 


002122 


1189 


003752 


012704 


000017 


1190 


003756 


004767 


000032 


1191 


003762 


012704 


000012 


1192 


003766 


004767 


000022 


1193 


003772 


012704 


000005 


1194 


003776 


004767 


000012 


1195 


004002 


005004 




1196 


004004 


004767 


000004 


1197 








1198 








1199 


004010 


000167 


000030 


1200 








1201 


004014 


170104 




1202 


004016 


170000 




1203 


004020 


013701 


177776 


1204 


004024 


042701 


177760 


1205 


004030 


020401 




1206 








1207 


004032 


001403 




1208 


004034 


104000 




1209 


004036 


000020 




1210 


004040 


0020L3 




1211 








1212 


004042 


000207 




1213 


004044 






1214 








1215 


004044 






1216 








1217 








1218 








1219 


004044 






1220 


004044 


005267 


174754 


1221 


004050 


005037 


002122 


1222 


004054 


012704 


000200 



C3 

. MAR^§4 ,,,ps „ooE 0 



LOSTi 



II: 

FINl: 

TSrP2: 



LDFPS 

STFPS 

CMP 

BEQ 

ERROR 

.WORD 

.WORD 

RTS 



l*TEST 4 
TST4: 



INC 
CLR 
MOV 
JSA 
MOV 
JSft 
MOV 
JS« 
CLR 
JSR 



FINl 

R4 

Rl 

R4.R1 
II 

17 

FPPERR 
PC 



TEST CFCC 



ITESTN 

MTRPFLC 

♦17, R4 

PC.TSF2 

•12. R4 

PC.TSF2 

«5.R4 

PC.TSF2 

R4 

PC.TSr2 



iLOAD FPS WITH DATA 
iLOAD Rl WITH CFPS) 
I DID THE INSTRUCTIONS WORK 
iTES CO ON 

I ALL ERRORS TO TRAP TO EMT VECTOR 
I UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 
I NO GO TO ERROR 
{RETURN 



.INCPEMENT TEST NUMBER 

iCLEA^ TRAP FLAG 

iSET'.J> DATA TO BE LOADED 

iLOAO t^PS AND COPY CONDITION CODES TO PS 

I SETUP DATA TO BE LOADED 

ILOAO FPS AND COPT COM)ITION CODES TO PS 

iSETLP DATA TO BE LOADED 

iLOAO FPS AHD COPY CO^CITION COOES TO PS 

iSETUP DATA TO BE LOADED 

iLOAD FPS AND COPY CONDITION COOES TO PS 



tsF2: 



It: 
FIN2: 

TSFP5: 

i*TEST 5 
I |*«****« 

TSTSi 



JMP 

LOFPS 

CFCC 

MOV 

BIC 

CMP 

BEQ 
ERROR 
.WORD 
.UORO 



FIN2 
R4 

••I77776,»l 

•177760,RI 

R4.R1 

II 

20 

FPPERR 
PC 



I LOAD FPS 

I COPT COM)ITION COOES TO PS 

I SAVE PS TO Rl 

iMASK OUT UNWANTED BITS 

iWAS CONDITION CODE BITS TRANSFERRED 

I CORRECTLY 

lYES GO ON 

I ALL ERRORS TO TRAP 70 EMT VECTOR 
I UNIQUE ERROR NUMBER 
•ADDRESS OF ERROR MESSAGE 
iNO GO TO ERROR 
iRETURN 



TEST SETF. StTO, SET!. SETL 



INC 
CLR 
MOV 



ITESTN 
MTRPFLG 
•200. R4 



•INCREMENT TEST NUMBER 

I CLEAR TRAP FLAG 

•SETUP DATA TO BE LOADED 



06 



12^3 


004060 


170104 








Lorps 


R4 




iLQAO FPS 
iMAKE FD-0 




1224 


004062 


170001 








SETF 








1225 


004064 


170201 








STFPS 


Rl 




1 STORE FPS 




1226 


004066 


020127 


000000 






CMP 


Rl.OC 




lis FD-0 




1227 


004072 


001403 








BEQ 


11 




lYES GO ON 




1228 


004074 


104000 








ERROR 






lALL ERRORS TO TRAP TO EMT 


VECTOR 


1229 


004076 


000021 








.UORO 


21 




1 UNIQUE ERROR NUMBER 




1230 


004100 


002013 








.WORD 


FPPERR 




(ADDRESS OF EHtiOR MESSAGE 




1231 
















iNO CO 


TO ERROR 




1232 


004102 


170011 






IS: 


SETO 






J MAKE FO-1 




1233 


004104 


170201 








STFPS 


Rl 




1 STORE FPS 




1234 


004106 


020104 








CMP 


R1.R4 




lis FO-1 




1235 


004110 


001403 








BEQ 


2« 




(YES CO ON 




1236 


004112 


104000 








ERROR 






J ALL ERRORS TO TRAP TO EMT 


VECTOR 


1237 


004114 


0000J2 








.uom> 


22 




(UNIQUE ERROR NUMBER 




1238 


004116 


002013 








.WORD 


FPPERR 




(ADDRESS OF ERROR MESSAGE 




1239 
















iNO CO 


TO ERROR 




1240 


004120 


012704 


000100 




2*: 


MOV 


♦100. R4 




(SETUP DATA TO BE LOADED 




1241 


004124 


170104 








LOFPS 


R4 




iLOAO FPS 




1242 


004126 


170002 








SET! 






(MAKE FL-0 




1243 


004130 


170201 








STFPS 


Rl 




(STORE FPS 




1244 


004132 


020127 


000000 






CMP 


Rl.#0 




lis FL-0 




1245 


004136 


001403 








BEU 


S« 




(YES GO ON 




1246 


004140 


104000 








ERROR 






(ALL ERRORS TO TRAP TO EMT 


VECTOR 


1247 


004142 


000023 








.WORD 


25 




1 UNIQUE ERROR NUr«ER 




1248 


004144 


002013 








.WORD 


FPPERR 




1 ADDRESS OF ERROR MESSAGE 




1249 
















(NO GO 


TO ERROR 




1250 


004146 


170012 






Sit 


SETL 






iMAKE FL-l 




1251 


004150 


170201 








STFPS 


Rl 




1 STORE FPS 




1252 


004152 


020104 








CMP 


RI.R4 




lis FL-l 




1253 


004154 


001403 








BEQ 


4t 




iYES GO ON 




1254 


004156 


104000 








ERROR 






|ALL ERRORS TO TRAP TO EMT 


VECTOR 


1255 


004160 


000024 








.WORD 


24 




(UNIQUE ERROR NUMBER 




1256 


004162 


002013 








.UORO 


FPPERR 




: ADDRESS OF ERROR tCSSAGE 




1257 
















iNO GG 


TO ERROR 




1258 


004164 








41: 












1259 






















1260 










I 












1261 


004164 








TSrP4t 












1262 






















1263 










i^TEST 


6 


TEST ILLEGAL 


OP CODES AND STST 




1264 






















1265 


004164 








TST6: 












1266 


004164 


005267 


174614 






INC 


tlESTN 




1 INCREMENT TEST NUMBER 




1267 


004170 


005037 


002122 






CLR 


••TRPFLG 




^CLtm TRAP FLAG 




1268 


004174 


012705 


170005 






nov 


•170005,R5 
B#244,-(SP) 
•XLL0P1.M244 
0*4. -(SP) 
•TXME0U.8M 




tINIT OP CODE 




1269 


004200 


013746 


000244 






MOV 




iSAVE FP VECTOR 




1270 


004204 


012737 


004S40 


000244 




MOV 




1 SETUP NEU VECTOR 




1271 


004212 


013746 


000004 






MOV 




tSAVE TIME OUT VECTOR 




1272 


004216 


012737 


004424 


000004 




MOV 




1 SETUP NEU VECTOR 




1273 


004224 


013746 


000010 






MOV 


MIO. -(SI*) 




iSAVE ILLEGAL VECTOR 




1274 


004230 


012737 


0044S4 


OOOOlO 




MOV 


•ILL0P2.M1O 




t SETUP NEU VECTOR 




1275 


004236 


005003 






Dlt 


CLR 


R5 








1276 


004240 


170103 








LOFPS 


RS 




1 CLEAR FPS 




1277 


004242 


005002 








CLR 


R2 








1278 


004244 


010537 


004250 






MOV 


RS.M02 




! SETUP THE ILLEGAL INST 





GLOBAi. AREAS MACUl 30A(1052) 15-MAR 84 16:58 
KDJllA.MAC 15 MAR 84 15:51 T6 TEST 



1279 


004250 


000000 




02: 


.UORO 


1280 


004252 


170000 




OS: 


CFCC 


1281 


004254 


005202 






INC 


1282 


004256 


005202 






INC 


1285 


004260 


170201 






STFPS 


1284 


004262 


104000 






ERROR 


1285 


004264 


000025 






.UORO 


1286 


004266 


002013 






.UORO 


1287 












1288 


004270 


022705 


170010 


04: 


CMP 


1289 


004274 


001003 






BNE 


1290 


004276 


012705 


170013 




MOV 


1291 


004302 


000755 






BR 


1292 


004304 


022705 


170077 


05: 


CMP 


1293 


004310 


001001 






BNE 


1294 


004312 


000402 






BR 


1295 


004314 


005205 




06: 


INC 


1296 


004316 


000747 






BR 


1297 


004320 


012637 


000010 


07: 


MOV 


1298 


004324 


012637 


000004 




MOV 


1299 


004330 


012637 


000244 




MOV 


1300 












1301 








f 




1302 


004334 


000167 


000104 




JMP 


1303 








1 




1304 


004340 


022716 


004252 


ILLOPI : 


CMP 


1305 


004344 


001403 






BEQ 


1306 


004346 


104000 






ERROR 


1307 


004350 


000026 






.UORO 


1308 


004352 


002013 






.WORD 


1309 












1310 


004354 


022626 




li: 


CMP 


1311 


004356 


170201 






STFPS 


1312 


004360 


022701 


100000 




CMP 


1313 


004364 


001403 






BEQ 


1314 


004366 


104000 






ERROR 


1315 


004370 


000027 






.WORD 


1316 


004372 


002013 






.UORO 


1317 












1318 


004374 


005004 




21: 


CLR 


1319 


004376 


170304 






STST 


1320 












1321 












1322 












1323 


004400 


022704 


000002 




CMP 


1324 


004404 


001002 






BNE 


1325 


004406 


000167 


177656 




JMP 


1326 


004412 






3t: 




1327 


004412 


104000 






ERROR 


1328 


004414 


000030 






.WORD 




004416 


002013 






.WORD 


1330 












1331 


004420 


000167 


177644 




JMP 


1332 












1333 


004424 






TIMEOU: 




1334 


004424 


104000 






ERROR 



E3 



E 30 

LEGAL OP CODES AND 3TST 



SEQ O050 



I MEMORY UOROS TO BE USED WITH 

R2 I EXECUTION OF ILLEGAL OP CODE 

R2 I 

Rl I SAVE FPS 

»ALL ERRORS TO TRAP TO FMT VECTOR 

25 (UNIQUE ERROR NUMBER 

FPPERR ; ADDRESS OF ERROR MESSAGE 

iGO TO ERROR 

«1 70010. R5 I COMPUTE NEXT OP CODE 

05 I 
«17001S.R5 i 
01 i 
♦170077, R5 t 

06 I 

07 , 
R5 t 
01 t 

{SP)».8«10 jRESTORE VECTORS 

(SP)».8«4 , 

( SP ) • . a*244 J 



FIN4 

♦03.CSP) 
It 

26 

FPPERR 

(SP)».(SP>. 
Rl 

•100000. Rl 
2t 

27 

FPPERR 

R4 
R4 



*2.R4 

S« 

04 



30 

FPPERR 
04 



,010 TRAP OCCUR ON TEST INST 
I YES GO ON 

I ALL ERRORS TO TRAP TO EMT VECTOR 
1 UNIQUE ERROR NUMBER 
|AW)RESS OF ERROR MESSAGE 
tNO GO TO ERROR 

I CLEAN UP STACK 
iSTORE FPS 
lis FPS CORRECT 
{YES GO ON 

J ALL ERRORS TO TRAP TO EMT VECTOR 
I UNIQUE ERROR NUMBER 
t ADDRESS OF ERROR MESSAGE 
tNO GO TO ERROR 

,INT R4 TO A KHOm STATE 
jSTORC FEC AT R4 

J IF TIC DESTINATION MODE IS IMPROPERL' 
iOECODEO AN 000 ADDRESS TRAP TO 4 
t»«ULD OCCUR 
lis FEC CORRECT 
tNO GO TO ERROR 
(YES GO ON 

I ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
I ADDRESS OF ERROR MESSAGE 
I GO TO ERROR 

tTMEN CO ON 



(ALL ERRORS TO TRAP TO LMT VECTOR 



GLOBAL. AREAS 
KOJllA.MAC 



MACni 50A(1052) 
15 MAR-64 15:51 



15 MAR 64 
T6 



OP COOES AND STST 



3E0 O051 



1355 
1336 
15S7 
1336 
1339 
1340 
1341 
1342 
1343 
1344 
1345 
1346 
1347 
1346 
1349 
1350 
1351 
1352 
1353 
1354 
1355 
1356 
1357 
1356 
1359 
1360 
1361 
1362 
1363 
1364 
1365 
1366 
1367 
1368 
1369 
1370 
1371 
1372 
1373 
1374 
1375 
1376 
1377 
1376 
1379 
1360 
1361 
1382 
1363 
1384 
1385 
1386 
1367 
1386 
1389 
1390 



004426 
004430 



000031 
002013 



004432 000006 



004434 
004434 
004436 
004440 

004442 
004444 

004444 



004444 
004444 

004450 
004454 
004460 
004466 
004472 
004474 
004476 
004500 
004502 
004506 
004510 
004512 
004514 

004516 
004520 
004524 
004526 
004530 
004532 



104000 
000032 
002013 

000006 



005267 
005037 
013746 
012737 
012703 
170103 
170020 
170000 
170201 
022701 
001403 
104000 
000033 
002013 

170304 
022704 
001403 
104000 
000034 
002013 



004534 012637 



004540 000167 



004544 
004544 
004546 
004550 

004552 
004554 

004554 



104000 
000035 
002013 

000006 



iLLGP2: 



FIN4! 
TSFP5: 



.WORD 
.WORD 

RTT 



ERROr<i 
.WORD 
.irfORD 

RTT 



31 

FPf'ERR 



32 

FPPERR 



{UNIQUE ERROR NUMBER 
I ADDRESS OF ERROR MESSAGE 
I ERROR BECAUSE OF TRAP TO 4 
(RETURN 



I ALL ERRORS TO TRAP TO EMT VECTOR 
t UNIQUE ERROR NUMBER 
I ADDRESS OF ERROR MESSAGE 
I ERROR BECAUSE OF TRAP TO 10 
{RETURN 



174334 
002122 
000244 
004S44 
040000 



140000 



{•TEST 7 

I 1******4 

TST7: 



TEST FID (INTERRUPT DISABLE BIT) 



000244 



000002 

000244 
000010 



II: 



2t! 



( 

ILL: 



FIN5: 

fsFP6: 
I !****< 



INC 


ITESTN 




(INCREMENT TEST NUMBER 


CLR 


S«TRPFLG 




{CLEAR TRAP FLAG 


NOV 


S«244. -(SP) 




(SAVE FP VECTOR 


HOV 


•ILL. 8*244 




(SETUP NEU VECTOR 


nov 


•40000. R3 




(SETUP DATA TO BE LOADED 


LOFPS 


R3 




(LOAD FPS. FID" I 


.UORD 


170020 




(ILLEGAL FP INSTRUCTION 


CFCC 








STFPS 


Rl 




(SEE IF ERROR WAS RECORDED 


CMP 


•140000. Rl 






BEQ 


1$ 




(YES GO ON 


ERROR 






(ALL ERRORS TO TRAP TO EMT 


.UORD 


S3 




(UNIQUE ERROR NUMBER 


.WORD 


FPPERR 




(ADDRESS OF ERROR MESSAGE 






(NO GO 


TO ERROR 


STST 


R4 




{SEE IF FEC"2 


CMP 


•2.R4 






BEQ 


2S 




IyES go ON 


ERROR 






(ALL ERRORS TO TRAP TO EMT 


.WORD 


34 




(UNIQUE ERROR l«f«ER 


.WORD 


FPPERR 




(ADDRESS OF ERROR MESSAGE 






tNO GO 


TO ERROR 


MOV 


(SP)*.a«244 




(RESTORE VECTOR 


JMP 


FINS 






ERROR 






(ALL ERRORS TO TRAP TO EMT 


.UORD 


35 




(UNIQUE ERROR NUMBER 


.WORD 


FPPERR 




(ADDRESS OF ERROR MESSAGE 






iFXO ERROR 


RTT 






(RETURN 


10 


TEST LOO. STD FSRC AND 


FOST MODE 1 



VECTOR 



GLOBAL AREAS 
KOJllA.MAC 



MACUl 50A(1052) 
15 MAR 84 15:51 



15 MAR 84 

no 



16 



G3 



TO rSRC AND roST MODE I 



SEQ 0032 



1391 








1392 


004554 






1393 


004554 


005267 


174224 


1394 


004560 


005037 


002122 


1395 


004564 


005004 




1396 


004566 


170104 




1397 


004570 


170011 




1396 


004572 


013746 


000004 


1399 


004576 


012737 


004750 


1400 


004604 


012704 


004 740 


1401 


004610 


172414 




1402 


004f12 


020427 


004740 


1403 


004616 


001403 




1404 


004620 


104000 




1405 


004622 


000036 




1406 


004624 


002013 




1407 








1406 


004626 


012701 


004730 


1409 


004632 


012703 


000004 


1410 


004636 


022421 




14U 


004640 


001403 




1412 


004642 


104000 




1413 


004644 


000037 




1414 


004646 


002013 




1415 








1416 


004650 


077306 




1417 


004652 


012704 


001136 


1418 


004656 


174014 




1419 


004660 


020427 


001136 


1420 


004664 


001403 




1421 


004666 


104000 




1422 


004670 


000040 




1423 


004672 


002013 




1424 








1425 


004674 


012701 


004730 


1426 


004700 


012703 


000004 


1427 


004704 


022421 




1428 


004706 


001403 




1429 


004710 


104000 




1430 


004712 


000041 




1431 


004714 


002013 




1432 








1433 


004716 


077306 




1434 


004720 


012637 


000004 


1435 








1436 








1437 


004724 


000167 


000030 


1438 








1439 


004730 


177777 




1440 


004732 


000000 




1441 


004734 


052525 




1442 


004736 


125252 




1443 


004740 


177777 




1444 


004742 


000000 




1445 


004744 


052525 




1446 


004746 


125252 





t 



TSTIO: 



It: 
2t: 



St: 



4t: 

St: 



6t: 



TS6DA: .tMMO 
.UORO 
.WORD 
.WORD 

TS60AT: .UORO 
.UORO 
.WORD 
.UORD 



INC 


ITESTN 


•INCREMENT TEST NUMBER 




CLR 


S«TRPF(.G 


i CLEAR TRAP FLAG 




CLR 


R4 


1 SETUP TO LOAD DATA 




LDFPS 


R4 


1 CLEAR FPS 




SETD 




iSET FD TO 1 




MOV 


fi«4.-(SP) 


iSAVE TIMEOUT VECTOR 




MOV 


«TSF6.S«4 


1 SETUP NEU VECTOR 




MOV 


•TS6DAT.R4 


I SETUP POINTER TO DATA 




LOO 


(R4).AC0 


1 TEST INSTRUCTION 




CMP 


R4.MS6DAT 


ilS R4 CORRECT 




BEQ 


It 


1 YES GO ON 




ERROR 




lALL ERRORS TO TRAP TO EMT 


VECTOR 


.WORD 


36 


(UNIQUE ERROR NUMBER 




.WORD 


FPPERR 


i ADDRESS OF ERROR MESSAGE 








1 NO GO TO ERROR 




MOV 


«TS6DA.R1 


1 SETUP POINTER TO DAT/? 




MOV 


•4,RS 


(INIT COUNTER 




CMP 


(R4)*.(R1)* 


lUAS SOURCE DATA ALTERED 




BEQ 


St 


1 NO GO ON 




ERROR 




lALL ERRORS TO TRAP TO EMT 


VECTOR 


.UORO 


37 


t UNIQUE ERROR NUMBER 




.UORD 


FPPERR 


1 ADDRESS OF ERROR MESSAGE 








lYES GO TO ERROR 




SOB 


RS.2t 


lARE UE DONE 




MOV 


#TSTL0C.R4 


t SETUP POINTER FOR DATA 




STO 


AC0.(R4) 


1 TEST INSTRUCTION 




CMP 


R«.*TSTLOC 


lis R4 CORRECT 




BEQ 


4t 


lYES GO ON 




ERROR 




lALL ERRORS TO TRAP TO EMT 


VECTOR 


.UORO 


40 


1 UNIQUE ERROR NUr«ER 




.UORD 


FPPERR 


lAOORESS OF ERROR MESSAGE 








tNO GO TO ERROR 




MOV 


•TS60A.RI 


; SETUP POINTER TO DATA 




MOV 


•4.R3 


iINIT COUNTER 




CMP 


CR4)*.(R1)* 


lis DESTINATION DATA CORRECT 


BEQ 


61 


(YES GO ON 




ERROR 




lALL ERRORS TO TRAP TO EMT 


VECTOR 


.UORO 


41 


(UNIQUE ERROR NUMBER 




.UORO 


FPPERR 


(ADDRESS OF ERROR MESSAGE 








iNO GO TO ERROR 




SOB 


RS.St 


lARE UE DONE 




MOV 


(SP)*.S«4 


(RESTORE VECTOR 




JMP 


F1N6 







177777 
000000 
052525 
125252 
177777 
000000 
052525 
125252 



- s 
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1447 








1 










1448 


004750 






tsr6: 










1449 


004750 


104000 






ERROR 






J ALL ERRORS TO TRAP TO EMT VECTOR 


1450 


004752 


000042 






.WORD 


42 




t UNIQUE ERROR NUMBER 


1451 


004754 


002013 






.WORD 


FPPERR 




t ADDRESS OF ERROR MESSAGE 


1452 














lOOD AOORESS TRAP 


1455 


004756 


000006 






RTT 






1 REBORN 


1454 


004760 






FIN6! 










1455 


















1456 


004760 






TSFP/s 










1457 


















1458 








j*TEST 


11 


TEST LDD. LDF 


FSRC MODE 


0 


1459 


















1460 


004760 






TSTll: 










1461 


004760 


005267 


174020 




INC 


ITESTN 




» INCREMENT TEST NUMBER 


1462 


004764 


005037 


002122 




CLR 


MTRPFLG 




1 CLEAR TRAP FLAG 


1465 


004770 


012704 


000200 




MOV 


♦200. R4 




J SETUP TO LOAD FPS 


1464 


004774 


170104 






1.0FPS 


R4 




jLOAO FPS. FO-1 


1465 


004776 


013746 


000004 




MOV 


0*4. -(SP) 
•TSF7.B#4 




J SAVE TIMEOUT VECTOR 


1466 


005002 


012737 


005154 000004 




MOV 




J SETUP NEW VECTOR 


1467 


005010 


012704 


005164 




MOV 


«TS70A1.R4 




J SETUP POIN iER TO DATA 


1468 


005014 


172414 






LOO 


(R4).AC0 




t CLEAR ACO 


1469 


005016 


012701 


005174 




MOV 


♦T570A2.R1 




t SETUP POINTER TO DATA 


1470 


005022 


172511 






LOO 


(Rl).ACl 




iLOAO ACl UITH OAT A 


1471 


005024 


172401 






LOO 


ACl.ACO 




J TEST INSTRUCTION 


1472 


005026 


012704 


001136 




MOV 


♦TSTLX.R4 




1 


1473 


005032 


174114 






STO 


ACl,(R4) 




1 CHECK IF ACl MAS BEEN ALTER^^O 


1474 


005054 


004767 


000072 




JSR 


PC. CHECK 7 




1 


1475 


005040 


012704 


001136 




MOV 


♦TSTL0C.R4 




J SETUP POINTERS FOR OATA 


1476 


005044 


012701 


005174 




MOV 


•TS70A2.RI 




t 


1477 


005050 


174014 






STO 


AC0.(R4) 




(CHECK IF ACO RECEIVED CORRECT DATA 


1478 


005052 


004767 


000054 




JSR 


PC. CHECK 7 




I 


1479 


005056 


012701 


005164 




MOV 


•TS70Al.ftl 




1 SETUP POINTER TO OATA 


1480 


005062 


172511 






LOO 


(Rl).ACl 




(CLEAR ACl 


1481 


005064 


170001 






SETF 






(SET FO-0 


1482 


005066 


172401 






LOF 


ACl.ACO 




t TEST INSTRUCTION 


1483 


005070 


170011 






SETO 






•SET FO-l 


1484 


005072 


012704 


001136 




MOV 


•TSTL0C.R4 




(SETUP POINTER TO DATA 


1485 


005076 


174114 






STO 


AC1,(R4) 




(CHECK IF ACl HAS BEEN ALTERED 


1486 


005100 


004767 


000026 




JSA 


PC. CHECK 7 




( 


1487 


005104 


012704 


005204 




MOV 


•TS70A4.R4 




(SETUP POINTERS FOR DATA 


1488 


005110 


012701 


001136 




MOV 


•TSTLOC.Rl 




1 


1489 


005114 


174011 






STO 


ACO.(Rl) 




(CHECK IF ACO MAS COR^^ECT DATA 


1490 


005116 


004767 


000010 




JSR 


PC. CHECK 7 






1491 


005122 


012637 


000004 




MOV 


(5P)*.SM 




iNESIORc VECTOR 


1492 


















1493 








1 










1494 


005126 


000167 


000062 




JMP 


FIN7 






1495 








i 








1496 


005132 


012703 


000004 


CHECK 7: 


MOV 


♦4.R5 




lINIT COUNTER 


1497 


005136 


022421 




CMEK7: 


CMP 


(R4)»,(Rl)» 




tIS DATA OK 


1498 


005140 


001403 






BEQ 


CMK7 




(YES GO ON 


1499 


005142 


104000 






ERROR 






(ALL ERRORS TO TRAP TO EMT VECTOR 


1500 


005144 


000045 






.UORO 


43 




(UNIQUE ERROR NUMBER 


1501 


005146 


002013 






.UORO 


FPPERR 




(AOORESS OF ERROR MESSAGE 


1502 














iNO GO 


TO ERROR 



i 
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StT no?4 



1505 


005150 


077306 




CHK7: SOB 


R3,CHEI<7 


iARE UE DONE 


1504 


005152 


000207 




RTS 


PC 


lYES RETURN 


1505 








i 






1506 


005154 






TSF7: 






1507 


005154 


104000 




ERROR 




(ALL cHRyRS 10 TRhI' TO cni 


1500 


005156 


000044 




. UORD 


44 


1 i&iTOi iC~ f noon iMOEn 

iCMIQUE ERROR NtflBER 


1509 


005160 


002013 




. WORD 


r PrtHR 


lAOUNcsb Or bRHOH ntSSA&t 


1510 










lODU nUDNEas THAP 


1511 


005162 


000006 




RTT 




(RETURN 


1512 








i 






1513 


005164 


000000 




TS7DA1: .UORD 


0 




1514 


005166 


000000 




.UQRO 


0 




1515 


005170 


000000 




, WORD 


0 




1516 


005172 


000000 




. UORD 


0 




1517 


005174 


037641 




TS7DA2: .WORD 


37641 




1516 


005176 


065121 




. WORD 


65121 




1519 


005200 


037373 




. UORD 


3 ?3/3 




1520 


005202 


022265 




.UQRO 


2cc65 




1521 


^y\C '%/\JI 

005204 


000000 




T b '1*4 ; . HUHU 


/\ 
U 




1522 


005206 


000000 






0 




1523 


005210 


037373 




.wORO 


5^373 




1524 


005212 


022265 




ft innn 

.WORD 


22265 




1525 


005214 






r IN7: 






1526 








i 






1527 


005214 






TSFPIO: 






1528 














1529 








J •TEST 12 


TEST STD, STF 


FOST MODE 0 


1530 














1531 


005214 






TST12: 






1532 


005214 


005267 


173564 


INC 


A ^ T&ft 

•TESTN 


lINUHcnfcNT TcST NUnBcR 


1533 


005220 


005037 


002122 




wtTBPrLC 


#»i r aB TA AB Pi A^ 

2 CLEAR TRAP FLAG 


1534 


005224 


012704 


000200 


MOV 


#200, R4 


Yl tf^ ■ AAA FA^ 

J SETUP TC LOAD FPS 


1535 


005230 


170104 




LDFPS 


R4 


1 AAA PB^ m . « 

iLOAO FPS. F0*1 


1536 


005232 


013746 


000004 


MOV 


••4. -vSP) 
•TSF 10,B#4 


tSAVc TintOUT VECTOR 


1537 


005236 


012737 


005410 000004 


MOV 


I SETUP NEW VECTOR 


1538 


005244 


012704 


005420 


MOV 


«TS10D1,n4 


f CTTi A BAT&jTC B TA AATA 

1 SETUP POINTER TO DATA 


1539 


005250 


172414 






CR4},I«C0 


f^i f AB A^A 

} CLEAR ACQ 


1540 


005252 


012701 


005430 


MOV 


•TS1002»R1 


<^C^ Ti iB BATk-tTf A T A A A T A 

t SETUP POINTER TO DATA 


1541 


005256 


172511 




LDO 


CRl /• ACl 


1 AAA A^« ■ ftT Tft^J A A T A 

tLOAu ACl WITH DATA 


1542 


005260 


174100 




STO 


ACliACO 


1 TEST INSTRUCTION 


1543 


005262 


012704 


001136 


MOV 


4TSTL0CtR4 




4 CM M 


O052o6 


174114 




STO 


*Cl,CR4 J 


^'■Ulff^M TP A^ t uAP BE CAl Aft 

• C^CK IF ACl HAS BEEN AL 


15«5 


005270 


004767 


000072 


JSR 


PC.CHECIO 




154o 


005274 


012704 


001136 


MOV 


#T5TL0C.R4 


t SETUP POINTERS FOR DATA 


1547 


005300 


012701 


005430 


MOV 


#TS1002.R1 




1548 


005304 


174014 




STO 


AC0.(R4) 


AkJir^ft^ TP Atf"^A BPAC TuP A Al 

t CHECK IF ACO RECEIVED COI 


1549 


005306 


004767 


000054 


JSR 


PC.CHECIO 




1550 


005312 


012701 


005420 


MOV 


JftVff*4i^#^4 BV 

#TS1001.R1 


PP Ti A AATkJTPB TA AATA 

t SETUP POINTER TO DATA 


1551 


005316 


172511 




ft 

LOO 


(Rl >,ACl 


^1 CAB « 

1 CLEAR ACl 


1552 


005320 


170001 




SETF 




iSET F0"0 










3 • r 






1554 


005324 


170011 




SETD 


iSET FO-1 


1555 


005326 


012704 


001136 


MOV 


♦TSTL0C.R4 


I SETUP POINTER TO DATA 


1556 


005332 


174114 




STO 


AC1.(R4) 


t CHECK IF ACl HAS BEEN AL 


1557 


005334 


004767 


000026 


JSR 


PC.CMECIO 




1558 


005340 


012704 


005440 


MOV 


•TS1004.R4 


1 SETUP POINTERS FOR DATA 
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1559 


005344 


012701 


001136 


1560 


005350 


174011 




1561 


005352 


004767 


000010 


1562 


005356 


012637 


000004 


1563 








1564 








1565 


005362 


000167 


000062 


1566 








1567 


005366 


012703 


000004 


1568 


005372 


022421 




1569 


005374 


001403 




1570 


005376 


104000 




1571 


005400 


000045 




1572 


005402 


002013 




1573 








1574 


005404 


077306 




1575 


005406 


000207 




1576 








1577 


005410 






1578 


005410 


104000 




1579 


005412 


000046 




1580 


005414 


002013 




1581 








1582 


005416 


000006 




1583 








1584 


005420 


000000 




1585 


005422 


000000 




1586 


005424 


000000 




1587 


005426 


000000 




1588 


005430 


177777 




1589 


005432 


111236 




1590 


005434 


100045 




1591 


005436 


003651 




1592 


005440 


000000 




:'^93 


005442 


000000 




1594 


005444 


100045 




1595 


005446 


003651 




1596 


005450 






1597 








1598 


005450 






1599 








1600 








1601 








1602 


005450 






1603 


005450 


005267 


173330 


1604 


005454 


005037 


002122 


1605 


005460 


012704 


000200 


1606 


005464 


170104 




1607 


005466 


012704 


005550 


1608 


005472 


172414 




1609 


005474 


170400 




1610 


005476 


170203 




1611 


005500 


012704 


001136 


1612 


005504 


174014 




1613 


005506 


012701 


000004 


1614 


005512 


022427 


000000 



MAR -84 16:58 P/ 
T12 TEST < 

MOV 
STD 
JSR 
MOV 

i 

JMP 

CHECIO: MOV 
CHIO: CMP 
BEQ 
ERROR 
.UORD 
.WORD 

CHKIO: SOB 
RTS 

TSFIO: 

ERROR 
.UORD 
.WORD 

RTT 

TSlOOl: .WORD 
.WORD 
.WORD 
.WORD 

TS1002: .bORO 
.WORD 
.UORO 
.UORO 

TS1004: .UORO 
.UORO 
.UORO 
.UORO 

riNlO: 
TSFPll: 
i*TEST 13 
TSTIS: 

INC 

CLR 

MOV 

LOrPS 

MOV 

LDD 

CLRO 

STFPS 

MOV 

STO 

MOV 

l»: CMP 



J3 



lE 35 

D. STF FDST MODE 0 

♦TSTLOC.Rl 
ACO.(Rl) 
PC. CHECIO 
(SP)*,S«4 



SEQ 005S 



I CHECK IF ACO HAS CORRECT DATA 
IrESTORE VECTOR 



FINIO 
*4,R3 

(R4)».(Rl)» 
CHKIO 

45 

FPPERR 

R3.CH10 
PC 



iINIT COUNTER 
lis DATA OK 
lYES GO ON 

I ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 
I NO GO TO ERROR 

lARE UE DONE 
I YES RETURN 



46 

FPPERR 



I ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 
(ODD ADDRESS TRAP 



0 
0 
0 
0 

177777 

111236 

100045 

3651 

0 

0 

100045 
S6S1 



TEST FDST SINGLE OPERAND MODE 0 



ITESTN 
8#TRPFLG 
«200.R4 
R4 

«TS1101,R4 

CR4).AC0 

ACO 

R3 

•TSTL0C.R4 
AC0.(R4) 
t4.Rl 
(R4)».«0 



(INCREMENT TEST NUMBER 
(CLEAR TRAP FLAG 
(SETUP TO LOAD FPS 
(SET FO-l 

(SETUP POINTER TO DATA 
(LOAD ALL ONES TO ACO 
{ TEST INSTRUCTION 
(GET FPS 

I CHECK ACO FOR ALL ZEROES 

:INIT COUNTER 

( 



<5 
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15 MAR 84 
T15 



16:58 PAGE 36 

TEST FOST SINGLE OPERAND MODE 0 



SEO O036 



1615 
1616 
1617 
1618 
1619 
1620 
1621 
1622 
1623 
1624 
1625 
1626 
1627 
1628 
1629 
1630 
1631 
1632 
1633 
1634 
1635 
1636 
1637 
1638 
1639 
1640 
1641 
1642 
1643 
1644 
1645 
1646 
1647 
1648 
1649 
1650 
1651 
1652 
1653 
1654 
1655 
1656 
1657 
1658 
1659 
1660 
1661 
1662 
1663 
1664 
1665 

1667 
1668 
1669 
1670 



005516 
005520 
005522 
005524 

005526 
005530 
005534 
005536 
005540 
005542 

005544 



001403 
104000 
000047 
002013 

077107 
020327 
001403 
104000 
000050 
002013 



000204 



005544 000167 000010 



005550 
005552 
005554 
005556 
005560 

005560 



005560 
005560 
005564 
005570 
005574 
005576 
005600 
005602 
005604 
005610 
005612 
005614 
005616 

005620 
005624 
005626 
005630 
005632 

005634 



005634 



005634 
005634 



177777 
177777 
177777 
177777 



21; 



SI: 



TSllOl: 



FINll: 



BEQ 
ERROR 
.WORD 
.WORD 

SOB 

CMP 

BEQ 

ERROR 

.UORD 

.UQRD 



JMP 

.UORO 
.UORD 
.UORD 
.UORD 



21 
47 

FPPERR 

Rl.l» 

R3.0204 

31 

50 

FPPERR 



FINll 

177777 
177777 
177777 
177777 



I OK GO ON 

I ALL ERRORS TO TRAP TO EMT VECTOR 
I UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 
I NO GO TO ERROR 

(ARE UE DONE 
I CHECK FPS 
I OK GO ON 

I ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 
(NO GO TO ERROR 



TSFP12! 

I 1****4 

I •TEST 

I 1****4 

TST14: 



14 



TEST FOST SOP MODE 0 UITH ILLEGAL AC7 



005267 


173220 


INC 


ITESTN 


005037 


002122 


CLR 


B*TRPFLG 


012703 


040200 


MOV 


♦40200. R5 


170103 




LOFPS 


RS 


170407 




CLftO 


AC 7 


170204 




STFPS 


R4 


170305 




STST 


R5 


022704 


140200 


CMP 


tl40200.R4 


001403 




BEQ 


It 


104000 




ERROR 




000051 




.UORD 


51 


002013 




.UORO 


FW»€RR 


022705 


000002 


1»: CUP 


#2.R5 


001403 




BEQ 


2t 


104000 




ERROR 




000052 




.WORD 


52 


002013 




.UORO 


FPPERR 



2«: 



tlNCI^MENT TEST NUMBER 

I CLEAR TRAP FLAG 

I SETUP TO LOAD FPS 

iSET FID-1. AND FD-1 

t TEST INSTRUCTION 

(GET FPS 

(GET FEC 

lis FPS CORRECT 

sVES GO ON 

(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
tATORESS OF ERROR MESSAGE 
iNO GO TO ERROR 

lis FEC CORRECT 
(YES GO ON 

(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 
(NO GO TO ERROR 



005267 173144 



TSFP13: 
UtEST 15 
TST15J 

INC 



TEST FOST SOP MODE I 



ITESTN 



(INCREMENT TEST NUMBER 



L3 



GLOBAL AREAS 
KOJllA.MAC 



MAC Y 11 30AC1052) 
15 -MAR -84 15:51 



15 riAR 84 16:58 PAGE 37 

Tl5 TEST POST SOP MODE 1 



SEQ 0057 



1671 


005640 


013746 


000004 






nuv 


CtAA CD ^ 


1672 


005644 


012737 


AAC "7 7 A 
005 ' ' 4 


AAAAAA 




nuv 




1673 


00563c 


00503 7 


002122 






n D 




1674 


005656 


012702 


/\AA *irtA 

000200 






nuv 


AOAA 0*> 


16/5 


005662 


170x02 










He 


1676 


005664 


012705 


AAA AAA 

0O00O4 






MO 17 

nuv 




167 / 


0056 f O 


012 f 04 


AA1 1 T£ 






nuv 


w 1 9 1 LUw « n*ff 




0056 f4 


012 f 24 


1 77777 

X f ( f t 1 




1 HAt • 
lUU* S 


nuv 


ill 77777 CPA 4 


16 '9 


005 f OO 


0 7 7D03 








cm 

3UO 


1AAS 
nD a 1 W 9 


16oO 


005/02 


012 '02 


AA1 1 






nuv 


ATQTl nr 03 
w 1 3 1 L.UU f nc 


lOol 


UU3 r U6 


1 7AA 1 O 








PI pn 
















cTrpc 

J 1 r r 3 


R3 


1600 


OOjf Id 


A^A007 
02022 I 


AA1 1 Til 






unr* 


nc t V 1 3 1 wu%» 


1 £ Oil 

1684 


OOD f 16 


AA1 A AT 
OUltO'S 










X • 


















loo6 


005 (Cc. 


OUUU33 












1 £.fi 7 
OO f 


005 fc4 


AAOA1 V 








Limn 


FDDFBQ 


iooo 














D1 
I nx 


1007 


OOD rcO 


Al 37rtl 
vXc rOX 






1 t • 

1 V : 


n\jv 


16"»U 


OOD r 


Oeccc r 


AAAAAA 




c V : 


PMP 








AA1 

V/UX^UO 














f 














1070 












uriDn 




1 £.OA 
16'** 


AAC 

OOD f 4«l 


AAOAI T 








unpn 


FDDFBB 


















1070 


005 f 46 


A771 A7 
Off XU f 






a* : 


ens 


B1 9t 


1 i^07 

i07 f 


AAC 7«IA 


AOAT07 

UeUoe f 










BX AdnA 




005 f54 


AA 4 il AV 

001403 










* • 


1077 




« AAAAA 








FBono 




1 7<V% 
1 f W 


AAC 7ilA 


OUUU33 








unon 

a MUKU 


39 


1 701 














FDPFBB 


1 7AO 
















1 7nx 

X r UO 


AA^7ilA 


9& V7 


AAAAAA 
UUIaAM 




• 


nuv 


f CDlk BAA 


1 Tt\A 
















1 7n<^ 

1. 'Uj 










1 






1 7n<i 
X 'v/o 


AA^77A 


AAA1 £7 
VOUlO f 


AAAAl A 






MB 


FTMI X 
r XraXA 


1 7rt7 
X f U ' 
















1 7nM 










TSF15: 






1 7nQ 

X ' V7 




1 AAAAA 








FDD no 




1 7 1 n 
X ' xu 




0Uvv30 








unon 


30 


X ' XX 




UUeUXd 








• WWW 


FDDFBB 


1713 
X 1 Xc 
















171^ 
X ' xo 












BTT 

Nil 




1 71 A 
X ' x*» 










s 






171^ 


WOW** 












1 71 A 
X ' xo 










t 






1717 


WOVU^ 








I 5r r X^ S 






1 71 R 

X ' xo 
















1 71 Q 
X ' X7 










1 • 1 ta 1 


XO 


TFCT FnQT cnp 


1720 
















1721 


006004 








TST16X 






1722 


006004 


005267 


172774 






INC 


•TESTN 


1723 


006010 


013746 


000004 






MOV 


©•4.-CSP) 


1724 


006014 


012737 


006150 


000004 




MOV 


«TSF14.8«4 


1725 


006022 


005037 


002122 






CLR 


S«TRPFLG 


1726 


006026 


012702 


000200 






MOV 


«200.R2 



irES GO 



I SAVE TIMEOUT VECTOR 
(SETUP NEU VECTOR 
I CLEAR TRAP FLAG 
(SETUP TO LOAD FPS 
iSET FO-l 
iINIT COUNTER 

1 SETUP POINTER TO TEST LOCATION 
iMOVE ALL ONES TO TEST LOCATION 
I ARE UE DONE 

t SETUP POINTER TO DATA 
TEST INSTRUCTION 
(GET FPS 

(MAS R2 ALTERED 
I NO GO ON 

I ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
i ADDRESS or ERROR MESSAGE 
TO ERROR 
iINIT COUNTER 
(CHECK LOCATION FQR 0 
I OK GO ON 

(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
I ADDRESS or ERROR MESSAGE 
(NO GO TO ERROR 

[ARE UE DONE 
J CHECK FPS 
lOK GO ON 

(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
I ADDRESS OF ERROR MESSAGE 
I NO GO TO ERROR 

{RESTORE VECTOR 



I ALL ERRORS TO TRAP TO EMT VECTOR 
lUNIQUE ERROR NUMBER 
i ADDRESS OF ERROR MESSAGE 
iOOO AOORESS TRAP 
{RETURN 



{INCREMENT TEST NUMBER 
J SAVE TIMEOUT VECTOR 
I SETUP NEW VECTOR 
I CLEAR TRAP FLAG 
I SETUP TO LOAD FPS 



GLOBAL AREAS MACYll 30A(1052) 15 MAR-84 16:58 
KOJllA.HAC 15 MAR-B4 15:51 T16 TEST 



1 737 


\A/OUOc 


1 701 f\0 








1 73A 




n 1 3 705 
UXc 


oonooA 




nu V 




AAAA4A 


VXc f 


no 1 1 XA 

W X X OD 




MOW 
nu V 


1 7XO 


nAAA44 


0 1 P 73A 


1 77777 
X ' ' f ' f 


1 OOl • 
X w * • 


MOU 


1 7^1 




07750X 








1 7X3 




fit 07A0 

Uxc rUe 


001 1 X<v 

uui ISO 




HOV/ 


1 7XX 

L 1 OO 




X 1 WHee 






n RO 


1 7^ 




1 70DftX 
X ' VcwO 








1 7XS 




npopP7 


001 14A 
WX X"tD 




CMP 


X r 




nm 40X 

WXMVO 








1 7X7 


fvv;n7n 


XwHVW 








1 7XA 


ooAn7p 


000057 
ww^ * 








1 7X4 

X ' w 7 


OAAD74 


X 

WCVXw 








1 740 












1 7A1 

X f *t X 


orwn7A 


vxc * 


001 1 Xf> 


X V a 




X ' *»c 


woxvc 


VXC ■ vX 


000004 




MOU 


X » ^ J 


Wv X Vv 


OPPPP7 


oooooo 

www 


2t • 
c * • 


CMP 


1 744 


Ww X XC 


00140S 

WX'VVw 








1745 


OO^I 14 
VW X x^ 


104000 






ERROR 


1746 


WV X Xw 


000060 

WWW 






UQRO 


1 747 


WvXCV 


OOPOI X 






UQRO 


1 74fl 












1 74Q 




077107 

V ' ' XV f 




St • 




1 7SO 


AOA1 P4 


OPOXP7 






TMP 


^ 7^1 




001 40X 










OAA1 X9 
WwX 








PRRdQ 


1755 

X f 




OOOOA1 






■ vfum/ 


1754 


OAAI XA 


00P01 X 








175S 












1756 


OOA14A 

VW X"t\/ 


Ol 3<iX7 

vXkwO I 


www** 


4 1 • 




1757 












1758 

X f 








1 




175^ 

X * 7 


AAA 1 44 


nooiA? 

UWXO ' 


AAAA1 A 




IMD 


X f W V 








t 




1761 


OOA1 SO 






TCP 1 4 • 
1 3" XH ! 




176? 

X f 


OOA1SO 


1 04000 








1763 


0OA1 5P 

Ww X^C 










1764 


006154 

WvX 


00P01 X 








1765 












1766 


0O6156 


000006 

VWWw 






RTT 

nil 


1767 












1768 


006160 

Ww XwV 






PIN14: 




1769 








1 




1770 


006160 






• f^X J • 




1771 












1772 








I ♦ I 1 


X f 


1773 












1774 


006160 






T5T17 • 
1 9 ■ X > * 




1775 


006160 

Xw V 


005267 


X ' C.wC V 


x>^v» 


1776 


006164 


013746 


000004 




HOV 


1777 


006170 


012737 


006370 000004 




HOV 


1778 


006176 


005037 


002122 




CLR 


1779 


006202 


012702 


000200 




HOV 


1780 


006206 


170102 






LDFPS 


1781 


006210 


012705 


000011 




HOV 


1782 


006214 


012704 


001136 




HOV 



M3 



E 38 

ST SOP MODE 2 
R2 

«4,R5 

♦TSTL0C.R4 

#177777, CR4)» 

R5.100* 

#TSTLQC.R2 

(R2)» 

R3 

R2.«TSTLOC*10 
II 

57 

FPPERR 

•TSTL0C.R2 
«4.R1 
(R2)*,«0 
31 

60 

PPPERR 

R1.2$ 

RS.«204 

41 

61 

FPPERR 
(SP)».8»4 



SEQ 005fe 



iSET FD-1 
tINIT COUNTER 

» SETUP POINTER TO TEST LOCATION 
iHOVE ALL ONES TO TEST LOCATION 
I ARE UE DONE 

I SETUP POINTER TO DATA 
J TEST INSTRUCTION 
{GET FPS 

tIS R2 CORRECT 
I YES GO ON 

I ALL ERRORS TO TRAP TO EHT VECTOR 
I UNIQUE ERROR NUHBER 
{ADDRESS OF ERROR HESSAGE 
iNO GO TO ERROR 

{SETUP POINTER TO DATA 
{INIT COUNTER 
{CHECK LOCATION FQR 0 
{YES GO ON 

{ALL ERRORS TO TRAP TO EHT VECTOR 
{UNIQUE ERROR NUMBER 
{ADDRESS OF ERROR HESSAGE 
(NO GO TO ERROR 

{ARE UE DONE 
{CHECK FPS 
(OK GO ON 

(ALL ERRORS TO TRAP TO EHT VECTOR 
(UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 
(NO GO TO ERROR 

(RESTORE VECTOR 



FIN14 



62 

FPPERR 



(ALL ERRORS TO TRAP TO EHT VECTOR 
{UNIQUE ERROR NUMBER 
(WORESS OF ERROR MESSAGE 
iOOO ADDRESS TRAP 
{RETURN 



TEST FOST SOP MODE 5 



•TESTN 

••4, (SP) 

•TSF1S.8M 

8#TRPFLG 

♦200.R2 

R2 

♦9.,R5 
♦TSTL0C,R4 



iZNCREHENT TEST NUHBER 
(SAVE TIHEOOT VECTOR 
(SETUP NEU VECTOR 
(CLEAR TRAP FLAG 
(SETUP TO LOAD FPS 
(SET FD-1 
(INIT COUNTER 

(SETUP POINTER TO TEST LOCATION 



N3 



GLOBAL 


AREAS 


MACYll 


VAA^ 4 A^ ' 

30A( 103« 


KDJllA, 


,MAC 


1 c ail 

15 -MAR -84 


4 e e « 

15:51 


1783 


006220 


012724 


177777 


1784 


006224 


077503 




1785 


006226 


012737 


001150 


1786 


006234 


012702 


001136 


1787 


006240 


170432 




1788 


006242 


170203 




1789 


006244 


020227 


AA4 « il ^ 

001140 




006250 


001403 




1791 


006252 


104000 




1792 


006254 


000063 




1793 


006256 


002013 




1 794 








1795 


006260 


012702 


AA4 4 V£ 

001136 


1796 


006264 


022227 


AA4 4 CA 

001150 


1 J y ^ 


AA£ '^'V A 

006270 


4 it A V 

001403 




1798 


006272 


4 Ail AAA 

104000 




1 799 


006274 


A AAAf ii 

000064 




1800 


006276 


002013 




looi 










AA£ V AA 
OO60OO 


012 701 


000004 


1 fiAT 


A V Ail 

00do04 


02222 7 


1 77777 




AA£ V 4 A 

006310 


001403 




IoOd 


AA£ 4 0 
OO60I2 


104000 






AA£ V 1 ik 
OOOOI4 


OOOOO5 




lOOr 


AA£ V 4 f 

006316 


002015 




1 AAA 








1 AAO 
XOU7 


AA£ VOA 

OOoo20 


077107 




1 A1 A 


AA£ TO') 

006o22 


012701 


AAAAA^ 

000004 


1 A1 1 

loll 


AA£ 

006326 


022227 


000000 


lolc 


Ay\^ wo 

006332 


001403 




1 A 1 T 


006334 


104000 




1 A1 il 
1014 


AA£ 

006336 


000066 




t A 1 ^ 


AA£ Vii A 

006340 


00201s 




1 A1 £i 








1 Al 1 


AA£ "WJk 0 

006342 


A^ ^ 4 A^ 

077107 




1 A 1 A 


006344 


020327 


000204 


10l9 


AA£ VC A 

0063d0 


001403 




i A^A 


AA£ YCO 

006352 


4 Ail AAA 

104000 




1021 


AA£ VC M 

006354 


000067 




lo22 


AAf VCf. 

006356 


002013 




1 A^T 

loco 








1 A^A 
10^4 


0063o0 


A 4 Of V ^ 

012637 


000004 


1 A^C 








1 A^£ 
lOcO 








lOc f 




000167 


AAAA 4 A 

000010 


1 AOA 
lOcO 








1 AOO 


OUoo/O 






1 A'SA 
lOOU 




4 Ail AAA 

104000 




lool 


OOoo72 


AAAA '^A 

0000 70 




1 A 4. 
106^ 


006374 


002013 




1 AW 








loM 


00637O 


AAAAAf 

000006 




1 ftX^ 

1003 








1836 


006400 






1837 








1638 


006400 







15 -MAR -84 
T17 

1001; 



16:58 PAGE 39 

TEST FOST SOP MODE 3 



SEQ 0039 



1$: 



2(: 



4ti 

5li 



61: 



7$: 



TSF15: 



MOV 

SOB 

MOV 

MOV 

CLRD 

STFPS 

CMP 

BEQ 

ERROR 

.UORO 

.WORD 

MOV 

CMP 

BEQ 

ERROR 

.UORO 

.UORO 

MOV 

CMP 

BEQ 

ERROR 

.UORO 

.WORD 

SOB 

MOV 

CMP 

BEQ 

ERROR 

.WORD 

.WORD 

SOB 

CMP 

BEQ 

ERROR 

.WORD 

.UORO 

MOV 



JrIP 



ERROR 
.UORO 
.UORO 

RTT 



•177777. (R4)» 
R5.100* 

»TSTL0C*12,8OTSTL0C 

♦TSTL0C.R2 

8(R2)» 

R3 

R2.«TSTL0C*2 
1» 



63 

FPPERR 

♦TSTL0C.R2 
(R2)*.*TSTL0C»12 
21 

64 

FPPERR 
«4.R1 

(R2)»,»177777 
4« 

65 

FPPERR 



(NO 



iNO 



R1.3< 
•4.R1 
(R2)».«0 
6( 

66 

FPPERR 

R1.5» 

R5.*204 

7« 

67 

FPPERR 
(SP)».»»4 



FINIS 



70 

FPPERR 



tNO 



iNO 



iNO 



iINIT -EST LOCATION 

lARE UE DONE 

»INIT TEST LOCATION 
1 SETUP POINTER TO DATA 

I TEST INSTRUCTION 

J GET FPS 

tIS R2 CORRECT 
;YES GO ON 

jALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
I ADDRESS OF ERROR MESSAGE 
GO TO ERROR 

I SETUP POINTER TO DATA 
}IS DATA CORRECT 
J YES GO ON 

I ALL ERRORS TO TRAP TO EMT VECTOR 
I UNIQUE ERROR NUMBER 
t ADDRESS OF ERROR MESSAGE 
GO TO ERROR 

iINIT COUNTER 

lis LOCATION ALL ONES 

lYES GO ON 

J ALL ERRORS TO TRAP TO EMT VECTOR 
i UNIQUE ERROR NUMBER 
t ADDRESS OF ERROR MESSAGE 
GO TO ERROR 

lARE UE DONE 
tINIT COUNTER 
tIS LOCATION 0 
(YES GO ON 

J ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
(A(X)RESS OF ERROR MESSAGE 
GO TO ERROR 

(ARE UC DONE 
(C^CCK FPS 
(OK GO ON 

(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
(AIMMESS OF ERROR MESSAGE 
GO TO ERROR 

(RESTORE VECTOR 



(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 
(ODD ADDRESS TRAP 
(RETURN 



FINIS: 
fsFPl6: 



B4 

GLOBAL AREAS MACUl 30A(1032) 15 HAR 84 16:38 PACE 40 SEQ 0040 



)J11A.MAC 1 


Ld rlAR 04 


15:51 


T20 


TEST rOST SOP MODE 4 








1839 




















1840 








t •TEST 


20 


TEST roST SOP 


noDc. 4 






1841 




















184^ 


006400 






TST20 : 












1843 


006400 


005267 


1 T ^ A AA 

172400 




INC 


»TESTN 




1 INCHtntNI TtSi NUnocH 




1844 


006404 


015746 


AAAAAA 

000004 




nov 


B«4, -CSP) 




1 SWVc T Int. OUT VcC TUN 




1845 


006410 


012737 


AAX ^ AAAAAil 

006562 000004 




HOV 


•TSri6.S«4 








1846 


006416 


005057 


AA^ « ^ ^ 

002122 




CLR 


a*TRPFLG 




. ri C AO TOAD Ci An 




1847 


006422 


012702 


AAAAAA 

000200 




HOV 


#200. R2 




1 SETUP TO LOAD FPS 




1848 


006426 


170102 






LOFPS 


R2 




iSET FO-1 




1849 


006450 


012705 


AAAA 1 A 

OOOOlO 




nov 


•8. .R5 




iINIT COUNTER 




1850 


006434 


012704 


AA t 1 V£ 

001156 




MOV 


•TSTL0C.R4 




1 SETUP POINTER TO TEST LOCATION 


1851 


006440 


012724 


177 77 7 


t AA A . 

lOOl : 


MOV 


•177777, (R4). 




iINIT TEST LOCATION 




1052 


006444 


077503 






soe 


R5.100t 




lARE UE DONE 




1853 


006446 


012702 


001146 




MOV 


•TSTL0C*10.R2 




iSETUP POINTER TO DATA 


1854 


006452 


1 /0442 






CLRO 


-(R2) 




1 TE^T IM^TRUCTIQN 




1855 


006454 


1 70203 






STFPS 


RS 




if;FT FPS 




1856 


006456 


020227 


001I30 




CMP 


R2,#T5TL0C 




tTS RP CQRRFCT 




1857 


006462 


00l*03 






BEQ 


It 








1858 


006464 


• f\M AAA 

104000 






ERROR 






I ALL ERRORS TO TRAP TO FMT 


Www 


1859 


006466 


AAAA? % 

000071 






.UORO 


71 




iLMTCkJE FRRQR NUMBER 




1860 


006470 


/\/\^At V 






.WORD 


FPPERR 




.Anhorcc nr ERROR HF^^AGF 




1861 














.kin pn 


TO ERROR 




186^ 


006472 


A % ^7A t 

012701 


AAAAAA 

000004 


f # . 
If : 


MOV 


*4,R1 








1865 


006476 


02222' 


AAAAAA 

oooooo 


2% : 


CMP 


(R2)».*0 




I LOCATIOM 0 

1 A J WWW ■ V 




1864 


006502 


AA « ^ AS 

OOI403 






BEQ 


SI 




• vF<: no nN 

1 ■ C9 




1865 


006504 


104000 






ERROR 






• Ail FRRflftC TO TRAP TD FMT 


VFrTHR 
V c w ■ 


1866 


006506 


000072 






.UORO 


72 




■ lAlTQLff FROnft NLMIFR 

1 \^V&WK *T^^9bn 




1867 


006510 


002015 






.UORO 


rPPERR 




lAOORCS^ OF ERROR ME^SACf 




1868 














iNu wU 


TO ERROR 




1669 


006512 


077107 




31 : 


SOB 


R1.2I 








1870 


006514 


012701 


AAAAAA 

000004 




nov 


*4.R1 




■ TNTT CQLIHTER 




1871 


006520 


02222 f 


\l 1 1 1 1 


At. 

41 ; 


CMP 


{R2)», #177777 




.TC LOtATTOM UNfHANCFO 




1872 


006524 


AA « AAV 

001405 






BEQ 


St 




{ tES GO ON 




1873 


006526 


« AA AAA 

I04000 






ERROR 






|ALL ERRORS TO TRAP TQ EMT 


VECTOR 


1874 


006530 


AAAAT V 

000073 






.UORO 


75 




tUNIQUE ERROR NUMBER 




1875 


006532 


002013 






.UORO 


FPPERR 




iMSORESS OF ERROR MESSAGE 




1876 














iMO uO 


TO ERROR 




1877 


006554 


ATT 1 AT 

077107 




E A . 

5t; 


soe 


R1.4t 




lARE UE DONE 




1878 


006556 


VOT 


AAAAAA 

000204 




CMP 


RS.#204 




1 CHECK FPS 




1879 


006542 


AA « AAV 

001405 






BEQ 


61 




1 OK GO ON 




1860 


006544 


« AA AAA 

104000 






ERROR 






(ALL ERRORS TO TRAP TO EMT 


VECTOR 


1881 


006S46 


AA/\A7^ 

000074 






.UORO 


74 




lUNIQUE ERROR NUMBER 




1862 


0065S0 


002015 






.UORO 


FPPERR 




lAOORESS OF ERROR MESSAGE 




1883 












_4iA ^A 


TO ERROR 




1664 


006552 


01cD5' 


000004 


of ; 


nov 


(SP)».8#4 




iRESTORE VECTOR 




1665 


















1666 








i 












1667 


006556 


OOOlO 1 


AAAA % A 

OOOOlO 




jnp 


FIN16 








1666 








1 












1669 


006562 






T5^ 16; 












1690 


006562 


• /VA /\/\A 

io*ooo 






ERROR 






)ALL ERRORS TO TRAP TO EMT 


VECTOR 


1691 


006564 








.UORO 


75 




1 UNIQUE ERROR NL*«ER 




1892 


006566 


002015 






.UORO 


FPPERR 




lAOORESS OF ERROR MESSAGE 




1895 














lOOO ADDRESS TRAP 




1694 


006570 


0O0CO6 






RTT 






{RETURN 





GCOGAl. areas MAC>11 50A(105^) 15 MAR 64 16:58 
KOJUA.mC 15 HAR 84 15:51 T?0 TEST 













i 




1896 


00657^ 








r iNio: 




1897 










1 




IB90 


/\A^C7^ 








TQFP 1 7 > 




• AAA 

IB'*'* 














1 AAA 

19W 










• aTPCT 
1 * 1 C3 1 


cl 


1 AA • 
















Art^^ 7*^ 








1 3 1 c 1 « 




1903 


AA^C7^ 

0065 7£ 




1 'c«Oo 






im. 


1 Q/VA 




A1 V7AiL 
Ul O '40 


A/W\AA 
UWW4 






MOW 
nvw 




U06D0e 


A1 0717 


UUO f «o 


AAAAAA 




MOW 


1 Q/^. 


AA&^ t A 


f 


Wclcc 






ri P 


IfU ( 




A1 07AD 


U\A/cvV 






nvv 


1 

l'»UO 




1 7A1 rtO 














A1 37A^ 


tfVWVII 1 
WWl 1 












fit ^TfiA 


nny i x#« 

\A/1 lOO 






Hnu 


1 Ol 1 




A1 ^y^A 


1 77777 
I 1 1 t t t 




1 (Vlt • 

iw» : 


Mnw 


1 Q1 D 












9VO 






ny 37X7 

vie r O r 


AAi 1 

^/l IDV 


AAl 1 X<> 
\A/1 1 OO 




Mnu 

■ IVW 


1 01 A 




Vic > vc 


AA1 140 
Wl l^V 






NOV 

flu V 






1 7nA*>? 

1 • V^Jt 










1 Q1 A 




1 7f»3ftX 
1 f vcvo 












lA/DODO 


vcvcc ' 


m\\ 1 X4^ 

Wl lOD 






PHP 


1 01 A 




Uvl*v3 








ocia 


1 Q1 Q 




1 AA/W% 










1 




UUW 'O 












A/WLA 7A 


























1 


tfVWLiL70 




nni 1 

Wl 13V 




1 i • 

1 9 S 


CHP 


1 


fVWL^7&. 


/V%Y AAV 








PFO 


1 

1 7C3 


/V^7fV\ 


1 AAfW\ 








FPPnB 




/VW7A^ 


AAAA77 








Ltfion 

.HUNU 


1 03 7 


WD fU* 


AAOAI X 
UUculiS 








unpn 


1 Q311 

1 7CO 














l7C7 


/V^7^\JL 


A t O 7A 1 
Ulc rVl 


AAAAAA 

UW/vUW 




el : 




1 QVn 

1 70W 




A00^^7 


X 1 f f f f 




xa • 


run 




wo ■ lO 


vUl^Ud 








AFO 




wVO rev 


IVWWv 








CnnvVf 




rtrwi733 

WO »cc 


A/\A1 /V> 








unon 




V/MO 1 










unon 
















1 QV; 


WO f cO 


n771ft7 
V f f lU 1 






A< « 


cm 

3VJD 


1 70 f 


UVO f 


Ulc 'Ul 


UWWv^ 






nuv 




AA^ 7»a 
UvO f 


A^oao7 


uuuwu 




^4 ■ 
31 : 


trw 


X 7 J 7 


v\^0 f ■tv 


vVl^UO 








PFO 


1440 


<VW«74? 
WO 


t A^AAA 








FPPnn 


1441 




fwii m 

VWUIUI 








unpn 


1 OA? 


wo r^O 










unpn 


144X 














1 444 
A 7^*» 




ft771ft7 
\j f r IV f 






09 s 


cnp 


1445 




VCV r 


000904 

WVCV"^ 






CMP 


1946 


006756 


001403 








BEO 


1447 


006760 


104000 








EfWOR 


1948 


006762 


000102 








.UORO 


1949 


006764 


00201 J 








.UORO 


1950 















C4 



E 41 

ST SOP MODE 4 



SEQ 0041 



TEST FOST SOP MODE 5 



ITESTN 
8*4. (SP) 
•TSF17.M4 

MTRPFLC 
♦200.R2 

R2 

•9. .R5 
♦TSTL0C.R4 
♦177777. CH4). 
R5.100I 

•TSTL0C*12.8«TSTL0C 
•TSTLK *2.R2 
8-(R2} 
RS 

R2.#TSTL0C 
II 



76 

FPPERR 

(R2)*.#TSTL0C»12 
2« 

77 

FPPERR 
#4 Rl 

(R2). .#177777 
4t 

100 

rpPERR 

Rl.Sl 
•4.RI 

(R2).,«0 
6* 

101 

FPPERR 

Rl.SI 
RS.A204 
71 

102 

FPPERR 



iNO GO 



iNO GO 



iNO GO 



iNO GO 



iNO GO 



INCREMENT TEST NUMBER 
SAVE TIMEOUT VECTOR 
SETUP NEW VECTOR 
CLEAR TRAP FLAG 
SETUP TO LOAD FPS 
SET FD-1 
INIT COUNTER 

SETUP POINTER TO TEST LOCATION 
INIT TEST LOCATION 
ARE UE DONE 

lINIT TEST LOCATION 
J SETUP POINTER TO DATA 
TEST INSTRUCTION 
GET FPS 

lis fl2 CORRECT 
YES GO ON 

ALL ERRORS TO TRAP TO EMT VECTOR 
lUNIQUE ERROR NUMBER 
ADDRESS OF ERROR MESSAGE 
TO ERROR 

lis DATA CORRECT 
YES GO ON 

ALL ERRORS TO TRAP TO EMT VECTOR 
UNIQUE ERROR NUr«ER 
ADDRESS OF ERROR MESSAGE 
TO ERROR 

INIT COUNTER 
IS LOCATION ALL ONES 
TES CO ON 

ALL ERRORS TO TRAP TO EMT VECTOR 
UNIQUE ERROR NUMBER 
ADDRESS OF ERROR MESSAGE 
TO ERROR 

ARE UE DONE 
INIT COUNTER 
IS LOCATION 0 
TES GO ON 

ALL ERRORS TO TRAP TO EMT VECTOR 
UNIQUE ERROR NUMBER 
ADDRESS OF ERROR MESSAGE 
TO ERROR 

ARE UE DONE 
CHECK FPS 
OK GO ON 

ALL ERRORS TO TRAP TO EMT VECTOR 
UNIQUE ERROR NUMBER 
ADDRESS OF ERROIf MESSAGE 
TO ERROR 



D4 

^m.ftS^'*'^ I5''^i^'k*'mr'' '■^'^^^ff ^^ = ?hl''^lT^i0P MODE 5 SEQ O042 



1 4S1 

nsi 










■ lU « 






iRESTORF VECTOR 


1955 








1 










1954 


006772 


000167 


000010 




JMP 


FIN17 






1955 








1 










1956 


006776 






TSF17: 










1957 


006776 


104000 






ERROR 






lALI ERRORS TO TRAP TO EMT VECTOR 


1950 


007000 


000103 






.UORO 


103 




t UNIQUE ERROR NUMBER 


1959 


007002 


002013 






.UORO 


FPPERR 




1 ADDRESS OF ERROR MESSAGE 


1960 














lOOO ADDRESS TRAP 


1961 


007004 


000006 






RTT 






1 RE TURN 


1962 








1 










1963 


007006 






riN17: 










1964 








1 










1965 


007006 






TSrP20: 










1966 


















1967 








l*TEST 


22 


TEST FDST SOP 


NODE 6 




1968 


















1969 


007006 






TST22: 










1970 


007006 


005267 


171772 




INC 


tlESTN 




1 INCREMENT TEST NUMBER 


1971 


007012 


005037 


002122 




CLR 


S«TRPFLG 




1 CLEAR TRAP FLAG 


1972 


007016 


013746 


000004 




NOV 


SM.-(SP) 




iSAVE TIMEOUT VECTOR 


1973 


007022 


012737 


007176 000004 




nov 


•TSr20,8«4 




I SETUP NEU VECTOR 


1974 


007030 


012702 


000200 




NOV 


•200. R2 




1 SETUP TO LOAD FPS 


1975 


007034 


170102 






LOFPS 


R2 




iSET FD-1 


1976 


007036 


012705 


000010 




NOV 


•a. ,RS 




llNIT COUNTER 


1977 


007042 


012704 


001136 




NOV 


•TSTL0C.R4 




1 SETUP POINTER TO TEST LOCATION 


1978 


007046 


012724 


177777 


loot: 


NOV 


•177777, (R4)» 




iINIT TEST LOCATION 


1979 


007052 


077503 






SOB 


RS.lOOt 




lARE UE 09C 


1980 


007054 


012702 


001137 




NOV 


•TSTL0C*1,R2 




1 SETUP POINTER TO DATA 


1981 


007060 


170462 


000007 




CURD 


7(R2) 




1 TEST INSTRUCTION 


1982 


007064 


170203 






STFPS 


R5 




iGET FPS 


1983 


007066 


020227 


001137 




CNP 


R2.«TSTL0C*1 




lis R2 CORRECT 


1984 


007072 


001403 






BEQ 


11 




tVES GO ON 


1985 


007074 


104000 






ERROR 






lALL ERRORS TO TRAP TO EHT VECTOR 


1986 


007076 


000104 






.UORO 


104 




•UNIQUE ERROR NUMBER 


1987 


007100 


002013 






.UORO 


FPPERR 




1 ADDRESS OF ERROR MESSAGE 


1988 














iNO GO 


TO ERROR 


1989 


007102 


012702 


001136 


It: 


NOV 


•TSTL0C.R2 




1 SETUP POINTER TO DATA 


1990 


007106 


012701 


000004 




NOV 


•4.R1 




lINIT COUNTER 


1991 


007112 


022227 


177777 


2t: 


CNP 


(R2)*. •177777 




lis DATA CORRECT 


1992 


007116 


001403 






8EQ 


SI 




iVES GO ON 


1993 


007120 


104000 






ERROR 






lALL ERRORS TO TRAP TO EMT VECTOR 


1994 


007122 


000105 






.UORO 


in 




•UNIQUE ERROR NUMBER 


1995 


007124 


002013 






.UORO 


FPPERR 




1 ADDRESS OF ERROR MESSAGE 


1996 














iHO GO 


TO ERROR 


1997 


007126 


077107 




St: 


soe 


R1,2I 




lARE UE DONE 


1998 


007130 


012701 


000004 




NOV 


•4,R1 




iINIT COUNTER 


1999 


007134 


022227 


000000 


4t: 


CNP 


(R2)*,*0 




lis DATA CORRECT 


2000 


007140 


001403 






BEQ 


51 




lYES CO ON 


2001 


007142 


104000 






ERROR 






|ALL ERRORS TO TRAP TO EHT VECTOR 


2002 


007144 


000106 






.UORO 


106 




1 UNIQUE ERROR NUMBER 


2003 


007146 


002013 






.UORO 


FPPERR 




1 ADDRESS OF ERROR MESSAGE 


2004 














iNO GO 


TO ERROR 


2005 


007150 


077107 




5t: 


SOB 


R1,4I 




lARE UE DONE 


2006 


007152 


020327 


000204 




CNP 


RS.«204 




lis FPS CORRECT 



(r4 



GLOBAL AREAS 
KDJllA.MAC 



MACUl 50A(105^) 
15-MAR 84 15:51 



15 MAR 64 

T22 



16 



?isT''F6lT''loP MODE 6 



SEQ O043 



y 

cUU ( 


AAT 1 










AA71 i^A 










AA71 


AAA1 A7 






DAI A 










^At 1 










3A1 O 


AA71 


At ^^V7 


AAAAAA 














3A1 A 












AA71 7P 


AAOt fc7 


AAAA1 A 
UWVX\^ 














3A1 7 


AA71 7*^ 










AA71 7i^ 


\ AAAAA 










AAA1 1 A 








UV'CVC 






















nnooo<^ 
wwuo 














































POP 7 










PAPA 


































AO^P^7 
lA/PcO f 


171 ^7P 
X ' XP ' c 






OA7P1 P 




OAP1 PP 








m X7AA 


AAAAOA 




PA^ 


AA7PPP 


A1 P7X7 
Vic 1 SI 


AA7APA 


AAAAAA 


PO^'i 




A1 P7AP 
UlC 'Uc 


AAAPAA 




pATf, 




1 7rtl OP 
X 'UXVC 






J r 




A1 P7A^ 
UXC IMj 


AA^VII A 






(V)7PAP 


UXc fU* 








VA^ t C^O 


01 P7PA 
UlC 'C^ 


1 77777 

X. i f f t f 




P040 


007P'iP 

VA/ f 


077<MX 










01 P7X7 
Uxc fSf 


UUXXSO 


uuxi*o 




nn7P^p 


A1 07A11 
UXc rUc 


AAf 1^1 






^A^ » COO 


1 7AA7P 

X I »C 


AAAAA^ 






007P7P 
VA/ r c ' c 


1 7APOX 
X rUcvO 








007P7A 


OPOPP7 
Ucvcc ' 


/V\1 1 A 1 




P046 


007 Wl 


Oni AAX 






P047 












007V1P 


1 AAAAA 








007 V>A 


AAA1 1 1 
wWXXX 






2050 




00P01 X 








007X10 
VA/ f JXv 


A1 P7AP 
VXC r Uc 


AA1 1 Xt^ 




POSP 


\A/ f 


A1 P7A1 
VXc r UX 








007XP0 
\A/ f 3cv 


APPPP7 
veccc • 


AAAAAA 




POS4 


007'XP4 


AA1 AAX 






P05S 


007XP#i 


1 AAAAA 






POS6 




AAA1 1 P 
%AA^XXc 






2057 


007332 


002013 






2058 










2059 


007354 


077107 






2060 


007336 


022227 


001136 




2061 


007342 


001403 






2062 


007344 


104000 







6): 



Tsrao. 



BEQ 
ERROR 
.UORO 
.UORO 

MOV 



JMP 



ERROR 
.WORD 
.WORD 

RTT 



6» 

107 

FPPERR 
(SP)».S«4 

riN20 



110 

fPPERR 



I YES CO ON 

I ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
I ADDRESS OF ERROR MESSAGE 
I NO GO TO ERROR 

•RESTORE VECTOR 



I ALL ERRORS TO TRAP TO EMT VECTOR 
{UNIQUE ERROR NUr«ER 
I ADDRESS OF ERROP MESSAGE 
I ODD ADDRESS TRAP 
(RETURN 



FIN20: 
TSFP21: 
I •TEST 23 



TEST FDST SOP MODE 7 



TST25S 



1001: 



21: 



St: 



INC 


ITESTN 




• INCREMENT TEST MMBER 




CLR 


a*TRPFLG 




t CLEAR TRM> FLAG 




MOV 


BM.-fSP) 
•TSr21.0«4 




•SAVE TIMEOUT VECTOR 




MOV 




tVETUP NEU VECTOR 




MOV 


•200. R2 




t SETUP TO LOAD FPS 




LOFPS 


R2 




iSET FD-1 




MOV 


•e..Rs 




iINIT COUNTER 




MOV 


•TSTl.0C.R4 




iSETUP POINTER TO TEST LOCATION 


MOV 


•177777, (R4). 




iINIT TEST LKATION 




see 


R5.100I 




{ARE UE DOIC 




MOV 


•TSTLX.WTSTLOC 


*10 


tINIT TEST LOCATION 




MOV 


•TSTL0C*5.R2 




•SETUP POINTER TO DATA 




CLitO 


85(R2) 




t*«*TESr INSTRUCT ION* •• 




STFPS 


R5 




iGET FPS 




CMP 


R2,^TSTC0C»5 




lis R2 CORRECT 




BEO 


1» 




tYES GO ON 

iNO GO TO ERROR 




ERROR 






tALL ERRORS TO TRAP TO ENT 


VECTOR 


.UORO 


111 




1 UNIQUE ERROR NUMBER 




.UORO 


r«»ERR 




1 ADDRESS OF ERROR MESSAGE 




MOV 


♦TSTL0C.R2 




(SETUP POINTER TO DATA 




MOV 


•4.RI 




iINIT COUNTER 




CMP 


(R2)*.«0 




lis DATA CORRECT 




BEQ 


SI 




lYES CO ON 




ERROR 






lALL ERRORS TO TRAP TO EMT 


VECTOR 


.MRO 


112 




lUNIQUE ERROR NUMKR 




.WORD 


FPPERR 


iNO GO 


1 ADDRESS OF ERROR MESSAGE 
70 ERROR 




soe 


Rl.2t 




lARE UE DONE 




CMP 


(R2)«.»TSTL0C 




lis DATA CORRECT 




BEQ 


41 




lYES GO ON 




ERROR 






lALL ERRORS TO TRAP TO EMT 


VECTOR 



GLOBAL. AREAS 
KDJllA.MAC 



MACVU SOACIOW) 15 MAR 84 16:58 PAGE 44 
15-MAR-84 15:51 T23 TEST FtJST 5 



4 



SOP MODE 7 



SEQ 0044 













2064 


007SSO 


WWCWA <^ 






2065 










2066 


007352 


01P701 


000003 




2067 


007556 




177777 




2068 


007562 


001403 

W X^W J 






2069 


007364 


104000 

i W^WWW 






2070 


007366 

WW • i^WW 


WWi 






2071 


007S70 








2072 










2075 


007572 


077107 






2074 


007374 


020327 


000204 




2075 


0074O0 


001405 






2076 


007402 


104000 

WWW 






2077 


007404 


000115 






2078 


007406 


002013 






2079 










2060 


007410 


012637 


000004 




2061 










2082 










2083 


007414 


000167 


OOOOiO 

wwwwxw 




2084 










2085 


007420 








2066 


007420 


104 OOO 

XW^ WWW 






2087 


007422 


000116 

wwwx xw 






2066 


007424 


WWCWXi' 






2089 










2090 


0074P6 

WW • 


WWWw 






2091 










2092 


007430 








2093 


007430 








2094 










2095 










2096 










2097 


007430 








2098 


007430 


005267 






2099 


007434 


005037 


OOP 122 
wwc xcc 




2100 


007440 


013746 


000004 
wwwww^ 




2101 


007444 


012737 


007606 

WW ■ www 


000004 


2102 


007452 


012702 


000200 

WWWfcWW 




2103 


007456 


170102 




2104 


007460 


012705 


000010 




2105 


007464 


012704 


001136 

WW4L A^#W 




2106 


007470 


012724 


177777 




2107 


007474 


077503 






2108 


007476 


012737 


001146 

WW A x^w 


0011S6 

WW* * 


2109 


007504 


170437 


001136 

wwx A «n# 


2110 


007510 


X 70203 




2111 


007512 


012702 


001136 

WW* * «9W 




2112 


007516 


012701 


000004 




2113 


007522 


022227 


000000 




2114 


007526 


001403 






2115 


007530 


104000 






2116 


007532 


000117 






2117 


007534 


002013 






2116 











4$! 

5$; 



6<: 



7$: 



TSF21: 



.WORD 
.WORD 

MOV 

CMP 

BEQ 

ERROR 

.WORD 

.UORO 

SOB 

CMP 

BEQ 

ERROR 

.WORD 

.WORD 

MOV 



JHP 



ERROR 
.UORO 
.WORD 

RTT 



U3 

FPPERR 
♦3.RI 

(R2)», 0177777 
6» 

114 

FPPERR 

Rl.5» 

R3.«204 

71 

115 

rPPERR 
CSP)*,S«4 



riN21 



116 

FPPERR 



I UNIQUE ERROR NUMBER 
(ADDRESS or ERROR MESSAGE 
I NO GO TO ERROR 

iINIT COUNTER 
J IS DATA CORRECT 
I YES GO ON 

I ALL ERRORS TO TRAP TO EMT VECTOR 
iLMIQUE ERROR NUMBER 
I ADDRESS OF ERROR MESSAGE 
I NO GO TO ERROR 

I ARE WE DONE 
J CHECK FPS 
I OK GO ON 

I ALL ERRORS TO TRAP TO EMT VECTOR 
I UNIQUE ERROR NUMBER 
I ADDRESS OF ERROR MESSAGE 
I NO CO TO ERROR 

(RESTORE VECTOR 



I ALL ERRORS TO TRAP TO EMT VECTOR 
tUNIOUE ERROR NUMBER 
lAOORESS OF ERROR MESSAGE 
I 000 ADDRESS TRAP 
iRETURN 



FIN21: t 
TSFP22: 



I * TEST 24 
TST24: 



TEST FOST SOP MODE 3 GR7 



1001: 



It: 



INC 
CLR 

nov 

MOV 

MOV 

LOTPS 

MOV 

MOV 

MOV 

soe 

MOV 

CLRO 

STFPS 

MOV 

MOV 

CMP 

BEQ 

ERROR 

.WORD 

.WORD 



•TESTN 

MTRPFLG 

»#4.-(SP) 

•TSF22.BM 

•200, R2 

R2 

♦8..R5 
#TSTL0C,R4 
♦177777, (R4)» 
RS.lOOl 

«TSTLOC*10,S*rSTLOC 

MTSTLOC 

RS 

•TSTL0C.R2 
♦4.R1 
(R2)».«0 
2» 



117 

FPPERR 



iNO GO 



I INCREMENT TEST NUr«ER 

t CLEAR TRAP FLAG 

I SAVE TIME OUT VECTOR 

i SETUP NEU VECTOR 

I SETUP TO LOAD FPS 

I SET FD-l 

tINiT COUNTER 

(SETUP POINTER TO TEST LOCATION 

(INIT TEST LOCATION 

(ARE UE DONE 

(INIT TEST LOCATION 
( TEST INSTRUCTION 

(GET FPS 

(SETUP POINTER TO DATA 
(INIT COUNTER 
(IS DATA CORRECT 
(>ES GO ON 

(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUc ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 
TO ERROR 



b4 



KOJllA. 


AREAS MACUl 
MAC 15 MAR 84 




2119 


007536 


077107 




2120 


007540 


012701 


000004 


2121 


007544 


022227 


177777 


2122 


007550 


001403 




2123 


007552 


104000 




2124 


007554 


000120 




2125 


007556 


002013 




2126 








2127 


00 7560 


077107 




2128 


007562 


020327 


000204 


2129 


007566 


AMI ilAV 

0O14OS 




2150 


007570 


4 AAA 

104000 




2131 


007572 


AAA4 ^ t 

O0O121 




2132 


007574 


002013 




2133 








Z1S4 


007576 


01263 7 


000004 


2135 








2136 








2137 


007602 


AAA 4 £ ? 

0001o7 


000010 


2136 








2139 


007606 






2140 


U07606 


4 AAA/\A 

104000 




2141 


0076I0 


000122 




2142 


007612 


002013 




2143 








2144 


007614 


0O00O6 




2145 








2146 


007616 






2147 








2146 


007616 






2149 








2150 








2151 








2152 


O07ol6 






2153 


007oI6 


AAC ^ 

005267 


171162 


2154 




AACA V 7 

005037 


002122 


2155 


O07o2o 


0 15746 


000004 


2156 


0076S2 


A4 V ^ 

012737 


007744 


2157 


007640 


A« '%^A'> 

012702 


000200 


2156 


OOf644 


4 ^A4 A'^ 

170102 




2159 


0070^0 


0I2705 


000004 


2160 


OOro5e 


012704 


001136 


2161 


007030 


0 12 724 


177777 


2162 


OO rClOc 


Or r!>05 




2163 


O07oo4 


1 f0467 


171246 


2164 


OO »o f O 


170205 




2165 


O07o72 


A 4 A4 

012701 


000004 


2166 


007676 


A 4 AO 

012702 


001136 


2167 


00770Z 


022227 


000000 


2168 


OO f f Oo 


AA4 i4AV 

001403 




2169 


OO f ' lO 


4 AJI AAA 

104000 




2170 




OUVlcA 




2171 


007714 


002015 




2172 








2173 


007716 


077107 




2174 


007720 


020327 


000204 



SEQ 0045 



2t'. 
5*; 



4)i 



5«i 



TSF22: 



SOB 

MOV 

CMP 

BEQ 

ERROR 

.WORD 

.UORO 

SOB 

CMP 

BEQ 

ERROR 

• WORD 

.WORD 

MOV 



JMP 



ERROR 
.WORD 
.WORD 

RTT 



Rl.l) 
»4.R1 

(R2)». #177777 
4» 

120 

rPPERR 

R1.3) 

R3,*204 

St 

121 

rPPERR 
(SP)».«#4 



riN22 



122 

FPPERR 



I ARE UE DONE 
lINIT COUNTER 
lis DATA CORRECT 
I YES CO ON 

I ALL ERRORS TO TRAP TO -MT VECTOR 
I UNIQUE ERROR NUMBER 
t ADDRESS OF ERROR MESSAGE 
I NO GO TO ERROR 

(ARE UE DONE 
I CHECK FPS 
iOK GC ON 

J ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 
I NO GO TO ERROR 

(RESTORE VECTOR 



I ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 
(ODD ADDRESS TRAP 
{RETURN 



FIN22: 
TSFP25: 



I* TEST 25 
TST2S; 



TEST rosT SOP nooe 6 gr? 



100»: 



II: 



2t: 



INC 


•TESTN 


{INCREMENT TEST NUMBER 


CLR 


StTRPTLG 


(CLEAR TRAP FLAG 


MOV 


M4»-(SP) 
•TSr25.8M 


{SAVE TIMEOUT VECTOR 


HOV 


1 SETUP NEU VECTOR 


nov 


•200.112 


{SETUP TO LOW FPS 


LOFPS 


R2 


{SET FO-1 


nov 


•4.R5 


{INIT COUNTER 


flov 


•TSTL0C.R4 


{SETUP POINTER TO TEST LOCATION 


nov 


#177777, (R4). 


{INIT TEST LOCATION 


SOB 


RS.tOOl 


{ARE UE DONE 


CLRD 


TSTtOC 


1 TEST INSTRUCTION 


STFPS 


R5 


iGET FPS 


MOV 


#4.Rl 


(INIT COUNTER 


HOV 


•TSTLOC.Re 


(SETUP POINTER TO DATA 


CMP 


(R2)*.«0 


(IS DATA CORRECT 


BEQ 


21 


(YES GO ON 


ERROR 


(ALL ERRORS TO TRAP TO EMT VECTOR 


.UORO 


125 


(UNIQUE ERROR NUr«ER 


.UORO 


FPPERR 


(ADDRESS OF ERROR MESSAGE 




(NO GO TO ERROR 


SOB 


Rl.l* 


(ARE UE DONE 


CMP 


R5.*204 


jCmECK FPS 



GLOBAL AREAS 
KOJllA.MAC 



MACYll 50A(1052) 
IS-MAR 84 15:51 



15 MAR 



4 



16:58 PACE 4§ 

TEST fBST 50P MODE 



6 GR7 



SEQ 0046 



^175 


007 724 


001403 






2176 


007726 


104000 






2177 


007730 


000124 






2178 


007732 


002013 






2179 










2180 


007734 


012637 


000004 




2181 










2182 










2183 


007740 


000167 


000010 




2184 










2185 


0077«»4 








2186 


007744 


104000 






2187 


007746 


000125 






2188 


007750 


002013 






2189 










2190 


007752 


000006 






2191 


007754 








2192 










2193 


007754 








2194 










2195 










2196 










2197 


007754 








2198 


007754 


005267 


171024 




2199 


007760 


005037 


002122 




2200 


007764 


013746 


000004 




2201 


007770 


012737 


010146 


000004 


2202 


007776 


012702 


000200 




2203 


010002 


170102 






2204 


010004 


012705 


000010 




2205 


010010 


012704 


001136 




2206 


010014 


012724 


177777 




2207 


010020 


077503 






2208 


010022 


012737 


001136 


001146 


2209 


010030 


170477 


171112 




2210 


010034 


170203 






2211 


010036 


012702 


001136 




2212 


010042 


012701 


000004 




2213 


010046 


022227 


000000 




2214 


010052 


001403 






2215 










2216 


010054 


104000 






2217 


010056 


000126 






2218 


010060 


002013 






2219 


010062 


077107 






2220 


010064 


022227 


001136 




2221 


010070 


001403 






2222 










2223 


010072 


104000 






2224 


010074 


000127 






2225 


010076 


002013 






2226 


010100 


012701 


000003 




2227 


010104 


022227 


177777 




2228 


010110 


001403 






2229 


010112 


104000 






2230 


010114 


000130 







3t; 



TSF23: 



FIN23: 
hFP24: 



BEQ 
ERROR 
.WORD 
.UORO 

MOV 



JMP 



ERROR 
.UORO 
.WORD 

RTT 



3$ 
124 

rPPERR 
(SP)».8«4 

riN23 



125 

FPPERR 



I OK GO ON 

J ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 
(NO GO TO ERROR 

(RESTORE VECTOR 



jALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
I ADDRESS OF ERROR MESSAGE 
tODD ADDRESS TRAP 



I •TEST 26 



TEST FDST SOP NODE 7 GR7 



TST26: 



1001: 



It: 



2t: 



31: 
4t: 



INC 


tTESTN 


(INCREMENT TEST NUMBER 




CLR 


B«TRPFLG 


(CLEAR TRAP FLAG 




MOV 


84NI.-(SP) 
•TSr2«,SM 


(SAVE TIMEOUT VECTOR 




NOV 


(SETUP NEU VECTOR 




NOV 


•200. R2 


(SETUP TO LOAD FPS 




LOFPS 


R2 


(SET FO-l 




NOV 


•a .RS 


(INIT COUNTER 




NOV 


•TSTL0C.R4 


(SETUP TEST LOCATION POINTER 


NOV 


•177777. (R4^» 


lINIT TEST LOCATION 




SOB 


RS.lOOt 


(ARE UE DONE 




NOV 


•TSTL0C.S*TSTL0C»10 


iJHlJ TEST LOCATION 




aRD 


arsTLOC'io 


l***TcST INSTRUCTION* •* 




STFPS 


RS 


(GET FPS 




NOV 


•TSTL0C.R2 


(SETUP POINTER TO DATA 




NOV 


•4.R1 


(INIT COUNTER 




CNP 


CR2)*.«0 


(IS DATA CORRECT 




BEQ 


2* 


(YES GO ON 

iNO. GO TO ERROR 




ERROR 




(ALL ERRORS TO TRAP TO EMT 


VECTOR 


.UORO 


l» 


(UNIQUE ERROR NUMBER 




.yoRO 


FPPERR 


t ADDRESS OF ERROR NESSAGE 




SOB 


Rl.ll 


(ARE UE DONE 




CNP 


(R2)».«TSTL0C 


(IS DATA CORRECT 




BEQ 


SI 


(YES GO ON 

(NO. GO TO ERROR 




ERROR 




(ALL ERRORS TO TRAP TO EMT 


VECTOR 


.UORO 


L27 


(UNIQUE ERROR NUMBER 




.WORD 


FPPERR 


(ADDRESS OF ERROR MESSAGE 




NOV 


•S.Rl 


(INIT COUNTER 




CNP 


(R2)». •177777 


(IS DATA CORRECT 




BEQ 


5* 


(YES GO ON 




ERROR 




(ALL ERRORS TO TRAP TO EMT 


VECTOR 


.WORD 


130 


(UNIQUE ERROR NUMBER 





14 



GLOBAL AREAS MACYll 50A(105^) 
KDJllA.MAC 15 MAR 84 15:51 



15 MAR 84 

T26 





01 ni ifk 








.WORD 










5<: 




2253 


010120 


077107 




SOB 


2254 


010122 


020527 


000204 




CMP 


2255 


010126 


001405 






BEQ 


2256 


010150 


104000 






ERROR 


2257 


010152 


000151 






.UORD 


2258 


010134 


002013 






.WORD 


2259 










MOV 


2240 


010156 


012637 


000004 


6$ : 


2241 












2242 








1 


JMP 


2245 


010142 


000167 


000010 




2244 








1 




2245 


010146 






TSF24: 




2246 


010146 


104000 






ERROR 


224 7 


010150 


000132 






.WORD 


2248 


010152 


002013 






.WORD 


2249 










RTT 


2250 


010154 


000006 






2251 








1 




2252 


010156 






riN24: 




2255 












2254 


010156 






TSFP25: 




2255 












2256 








l*TEST 


27 


2257 












2258 


010156 






TST27: 




2259 


010156 


005267 


170622 




INC 


2260 


010162 


005057 


002122 




CLR 


2261 


010166 


005002 






CLR 


2262 


010170 


170102 






LDFPS 


2263 


010172 


012705 


000004 




MOV 


2264 


010176 


012704 


001136 




HOV 


2265 


010202 


012724 


177777 


IOCS: 


nov 


2266 


010206 


077505 






SOB 


2267 


010210 


012702 


001156 




nov 


2266 


010214 


170422 








2269 


010216 


170203 






srrps 


2270 


010220 


020227 


001142 




CHP 


2271 


010224 


001403 






BEQ 


2272 












2275 


010226 


104000 






ERROR 


2274 


010230 


000135 






.UORO 


2275 


010232 


002013 






.V40RO 


2276 


010234 


012702 


001136 


It: 


nov 


2277 


010240 


012701 


000002 




nov 


2278 


010244 


022227 


000000 


2*i 


cnp 


2279 


0102S0 


001403 






BEQ 


2280 












2281 


010252 


104000 






ERROR 


2282 


010254 


000134 






.WORD 


2283 


010256 


002013 






.WORD 


2284 


010260 


077107 




31 ! 


SOB 


2285 


010262 


012701 


000002 




nov 


2286 


010266 


022227 


177777 


4t: 


CMP 



16:58 PAGE 4 7 

TEST FOST SOP MODE 

FPPERR 



R1.4» 

RS.^SOA 

6« 

151 

FPPERR 
(SP)*.8«4 



7 GR7 



SEO O04 7 



FIN24 



152 

FPPF.RR 



, ADDRESS OF ERROR MESSAGE 
I NO GO TO ERROR 
(ARE WE DONE 
I CHECK FPS 
I OK GO ON 

I ALL ERRORS TO TRAP TQ EMT VECTOR 
(UNIQUE ERROR NUMBER 
{ADDRESS OF ERROR MESSAGE 
I NO GO TO ERROR 

tRESTORE VECTOR 



I ALL ERRORS TO TRAP TO EMT VECTOR 
tUNlQUC ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 
I ODD ADDRESS TRAP 



TEST CLRF 



tTESTN 

8*TRPFLG 

R2 

R2 

44.R5 

♦TSTL0C,B4 

•177777, (R4). 

R5. loot 

•TSTL0C.R2 

(R?)» 

R5 

R2.#TSTL0C»« 
It 



135 

rPPERR 

#T<<L0C,R2 

•2.RI 

(R2)».#0 

St 



IM 

FPPERR 
Rl.2t 
9i ft' 

(R2)».<»177777 



INCREnEHT TEST NUr«ER 
CLEAR TRAP FLAG 
SETUP TO LOAD FPS 
SET FO-O 
ZNIT COUNTER 

SETUP POINTER TO TEST LOCATION 

INIT TEST LOCATION 

ARE yC OONE 

SETUP POINTER TO DATA 

TEST INSTRUCTION 
GET '-PS 
IS R2 CORRECT 
YES GO ON 
NO. GO TO ERROR 

ALL ERRORS TO TRAP TO EMT vEC^QP 

UNIQUE ERROR NUr«ER 

ADDRESS or ERROR MESSAGE 

SETUP POINTER TO DATA 

INIT COUNTER 

IS DATA CORRECT 

YES GO ON 

NO, GO TO ERROR 

ALL ERRORS TO TRAP TO EMT VECTOR 

UNIQUE ERROR NUMBER 

ADDRESS OF ERROR MESSAGE 

ARE HE DONE 

INIT COUNTER 

IS DATA CORRECT 



GLOBAL AREAS MACrll 30A(1052) 15-MAR-84 16:58 



)J11A 


MAC 15 -MAR 64 


Id :ol 




TC C T Pi 


2267 


010272 


001403 






BcQ 


2266 












2289 


010274 


104000 






cKKON 


2290 


010276 


000135 






. UORU 


2291 


010300 


002013 






. WUKU 


2292 


010302 


077107 




3» : 


30d 


229 B 


010304 


020327 


000004 




CHP 


2294 


010310 


001403 






ncn 


2295 












2296 


010312 


104000 






cKKUR 


2297 


010314 


000136 






unon 
, WUHU 


2298 


010316 


002013 






• WUHO 




010320 






o* : 
















2301 








t 




2302 


010320 






TCCDO^ • 

I br P2o : 




2303 












2304 








1 *Tt5T 


OQ 


2 305 












2306 


010320 






TCT . 






010320 


005267 


1 'vMoO 






23O0 


010324 


005037 


/\^ov oo 






2.509 


010330 


005004 








2310 


010332 


170104 








2311 


010334 


170567 


000300 




TbTr 


2312 


010340 


170203 






5TrP5 


2ol3 


010342 


020327 


000OO4 






CO 14 


010346 


001403 






DCQ 
















010350 


104000 






cRHOH 


O* 1 T 


010352 


000137 






• WWU 


^olB 


010354 


002013 






.UUKU 


2319 


010356 


012704 


010640 


If : 


nOV 




010362 


012702 


OlOorO 




nUV 




010366 


004767 


000224 








010372 


170537 


010650 




T<? TIT 

TSTF 


C.323 


010376 


170203 






STrws 




010400 


020327 


000010 




CHP 




010404 


001403 






OCA 














eOc ' 


010406 


104000 






cfWUn 




010410 


000140 






.WORD 




010412 


002013 






.mUHU 




010414 


012704 


A« AC 

010650 


21 : 


nov 




010420 


012702 


OlO rOO 




nOV 




010424 


004767 


000166 








010430 


170567 


000224 




TSTP 


O Wil 


010434 


170203 






STFPS 




010436 


020327 


oooooo 








010442 


001403 






DCQ 


r 














010444 


104000 






CRnUN 


C <^ J 7 


010446 


000141 








2540 


010450 


002013 






.WORD 


2341 


010452 


012704 


010660 


3t: 


MOV 


2342 


010456 


012702 


010710 




nov 



J4 

48 



5» 



135 

FPPERR 
R1.4I 
R3,«4 
6» 



136 

FPPERR 



I YES GO ON 

iNO GO TO ERROR 

I ALL ERRORS TO TRAP TO EMT VECTOR 

(UNIQUE ERROR NUMBER 

(ADDRESS OF ERROR MESSAGE 

(ARE UE DONE 

(CHECK FPS 

(OK GO ON 

(NO. GO TO ERROR 

(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 



TEST TSTF AND TSTD 



tTESTN (INCREMENT TEST NUMBER 

8#TRPFLG (CLEAR TRAP FLAG 

R4 (SETUP TO LOW FPS 

R4 iSFT FO-0 

TS26D0 i***TEST INSTRUCT ION* 

R3 I GET FPS 

R3.M (CHECK FPS 

II I OK GO ON 

iNO. GO TO ERROR 

{ALL ERRORS TO TRAP TO EMT VECTOR 
137 (UNIQUE ERROR NUMBER 

FPPERR lAOORESS OF ERROR MESSAGE 

•TS26D0.R4 t SETUP POINTERS TO DATA 

#TS26D3.R2 i 

PC.CHEC26 (CHECK IF DATA IS CORRECT 

8#TS2601 I 'LATEST INSTRUCTION*** 

R3 iGET FPS 

R3.*10 I CHECK FPS 

2« (OK GO ON 

iNO. GO TO ERROR 

(ALL ERRORS TO TRAP TO EMT VECTOR 

140 (UNIQUE ERROR NUMBER 
FPPERR > ADDRESS OF ERROR MESSAGE 
•TS26D1.R4 I SETUP POINTERS TO DATA 
•TS2604.R2 : 

PC.CHEC26 » CHECK IF DATA IS CORRECT 

TS2602 (***TEST INSTRUCTION*** 

R3 (GET FPS 

R5.«0 (CHECK FPS 

St I OK GO ON 

iNO. GO TO ERROR 

I ALL ERRORS TO TRAP TO EMT VECTOR 

141 (UNIQUE ERROR NUMBER 
FPPERR (ADDRESS OF ERROR MESSAGE 
♦TS26D2,R4 (SETUP POINTERS TO DATA 



•TS2605.R2 



GLOBAL ARFAS MACni 30A(1052) 
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T50 TEST TSTr AND TSTO 



<?543 


010462 


004767 


000130 


2344 


010466 


012704 


000200 


2345 


010472 


170104 




2346 


010474 


170537 


010640 


234 7 


010500 


1 70203 




2548 


010502 


020327 


000204 


2349 


010506 


001403 




2350 








2351 


010510 


104000 




2352 


010512 


000142 




2555 


010514 


002013 




2354 


010516 


012704 


010640 


2555 


010522 


012702 


010670 


2356 


010526 


004767 


000064 


2557 


010532 


170567 


000112 


2358 


010556 


170203 




2559 


010S40 


020327 


000210 


2560 


010544 


001405 




2561 








2562 


010546 


104000 




2565 


OlOSSO 


000143 




2364 


010552 


002013 




2565 


01(S54 


012704 


010650 


2566 


010560 


012702 


010700 


2367 


010564 


004767 


000026 


2568 


010570 


170567 


000064 


2569 


010574 


170203 




2570 


010576 


020327 


000200 


2571 


010602 


001405 




2572 


010604 


104000 




2575 


010606 


000144 




2574 


010610 


002013 




2575 








2576 


010612 






2577 








2578 








2579 


010612 


000167 


000102 


2580 








2381 


010616 


012701 


000004 


2582 


010622 


022422 




2385 


010624 


001405 




2584 


010626 


104000 




2385 


010630 


000145 




2586 


010652 


002015 




2587 








2588 


010634 


077106 




2589 


010636 


000207 




2590 








2591 


010640 


000177 




2592 


010642 


177777 




2593 


010644 


177777 




2594 


010646 


177777 




2595 


010650 


177777 




2596 


010652 


000000 




2397 


010654 


000000 




2398 


010656 


OOOOOO 





4«; 



51: 



6«: 



JSR 

MOV 

LDFPS 

TSTO 

STFPS 

CMP 

BEQ 

ERROR 

.UORO 

.WORD 

MOV 

MOV 

JSR 

TSTO 

STFPS 

CMP 

BEQ 

ERROR 

.UORO 

.UORD 

MOV 

MOV 

JSR 

TSTO 

STFPS 

CMP 

BEQ 

ERROR 

.UORO 

.UORD 



JMP 



CHEC26: MOV 
It: CMP 
BEQ 
ERROR 
.UORO 
.UORD 



2»i 



SOB 
RTS 



TS2600: .UORO 
.UORO 
.UORO 
.UORD 

TS26DI: .UORO 
.UORD 
.UORO 
.WORD 



PC,CHEC26 

«200,R4 

R4 

8«TS2600 
R3 

R3.«204 
4t 



142 

FPPERR 

«TS26D0.R4 

•TS2603.R2 

PC.CHEC;>6 

TS2601 

RS 

R5.«210 

ss 



145 

FPPERR 

•TS26D1.R4 

•TS2604.R2 

PC.CHEC26 

TS2602 

R3 

R3.0200 
61 

144 

FPPERR 



FZN26 
«4.Rt 

CR4)».(R2) 
2* 

145 

FPPERR 

Rl.lt 
PC 

177 

177777 

177777 

177777 

177777 

0 

0 

0 



» CHECK IF DATA IS CORRECT 
J SETUP TO LOAD FPS 
iSET FD-l 

»**«TEST INSTRUCTION*** 

.GET FPS 

J CHECK FPS 

iDK GO ON 

iNO. GO TO ERROR 

I ALL ERRORS TO TRAP TO EMT VECTOR 
I UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 
I SETUP POINTERS TO DATA 

I CHECK IF DATA IS CORRECT 

l***TEST INSTRUCTION*** 

I GET FPS 

i CHECK FPS 

I OK GO ON 

iNO. GO TO ERROR 

(ALL ERRORS TO TRAP TO EMT VECTOR 
I UNIQUE ERROR NUMBER 
t ADDRESS OF ERROR MESSAGE 
(SETUP POINTERS TO DATA 

ICHECK IF DATA IS CORRECT 
(***TEST INSTRUCTION 
(GET FPS 
(CHECK FPS 
(OK GO ON 

(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 
NO GO TO ERROR 



lINZT COUNTER 
(ZS DATA CORRECT 
lYES GO ON 

(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
(AOORESS OF ERROR MESSAGE 
NO GO TO ERROR 

(ARE UE CONE 
(RETURN 



GLOBAL AREAS MAC Y 11 50A(1052) 15 HAR 64 16:56 I 
KOJllA.MAC 15 MAR 64 15:51 TSO TEST 



2599 


010660 


077777 




TS26D2: 


.WORD 


2400 


010662 


000000 






.WORD 


2401 


010664 


000000 






.WORD 


2402 


010666 


000000 






.WORD 


2403 


010670 


000177 




TS26DS: 


.WORD 


2404 


010672 


177777 






.WORD 


2405 


010674 


177777 






.WORD 


2406 


010676 


177777 






.WORD 


2407 


010700 


177777 




TS26D4: 


.WORD 


2406 


010702 


000000 






.WORD 


2409 


010704 


000000 






.WORD 


2410 


010706 


000000 






.WORD 


2411 


010710 


077777 




TS26D5: 


.WORD 


2412 


010712 


000000 






.WORD 


2413 


010714 


000000 






.WORD 


2414 


010716 


000000 






.WORD 


2415 


010720 






FIN26: 




2416 








• 




2417 


010720 






TSFP27 : 




2416 












2419 








l*TEST 


51 


2420 












2421 


010720 






TST51: 




2422 


010720 


005267 


170060 




INC 


2423 


010724 


005037 


002122 




CLR 


2424 


010730 


005005 






CLR 


2425 


010732 


170105 






LOFPS 


2426 


010734 


012701 


000014 




MOV 


2427 


010740 


012704 


001136 




nov 


2426 


010744 


012703 


011204 




MOV 


2429 


010750 


012324 




100*: 


MOV 


2430 


010752 


077102 






SOB 


2431 


010754 


012705 


001156 




MOV 


2432 


010760 


170615 






ABST 


2433 


010762 


170203 






STFPS 


2434 


010764 


020527 


001156 




CMP 


2435 


010770 


001403 






BEQ 


2436 












2437 


010772 


104000 






ERROR 


2436 


010774 


000146 






.WORD 


2439 


010776 


002013 






.WORD 


2440 


011000 


012702 


011234 


11: 


MOV 


2441 


011004 


004767 


000152 




JSR 


2442 


011010 


020327 


000000 




CMP 


2443 


011014 


001403 






BEQ 


2444 












2445 


011016 


104000 






ERROR 


2446 


011020 


000147 






.WORD 


2447 


011022 


002013 






.WORD 


2446 


011024 


012705 


001 I4f 


2*: 


MOV 


2449 


011030 


170625 






A8SF 


2450 


011032 


170203 






STFPS 


2451 


011034 


020527 


001152 




CMP 


2452 


011040 


001403 






BEQ 


2453 












2454 


011042 


104000 






ERROR 



L4 

tf^Snd tstd 

77777 
0 
0 
0 

177 

177777 

177777 

177777 

177777 

0 

0 

0 

77777 
0 
0 
0 



TEST ABSF 



»TESTN 

mtrpflg 

R5 
R5 

•12. .Rl 

•TSTL0C.R4 

•TS2700.R3 

CR5)*.(R4}. 

Rl.lOOt 

•TSTL0C.R5 

(R5) 

R5 

R5.#TSTL0C 
1% 



146 

FPPERR 

♦TS2703,R2 

PC,CHEC27 

R5.90 

21 



147 

FPPERR 

•TSTL0C»10,R5 

(R5)» 

R3 

R5.«TSTL0C»14 
51 



lINCf^MENT TEST NUrSER 
I CLEAR TRAP FLAG 
I SETUP TO tOAO FPS 
iSET FO-0 
lINXT COUNTER 

I SETUP POINTER TO TEST LOCATION 

I SETUP POINTER TO TEST VALUE 

tINiT TEST LOCATION 

lARE ME DONE 

t SETUP POINTER TO DATA 

t***TEST INSTRUCTION*** 

jGET FPS 

tIS R5 CORRECT 

I YES GO ON 

iNO. GO TO ERROR 

{ALL ERRORS TO TRAP TO EMT VECTOR 

I UNIQUE ERROR NUMBER 

I ADDRESS OF ERROR MESSAGE 

I SETUP POINTER TO DATA 

J CHECK IF DATA IS CORRECT 

I CHECK FPS 

I OK GO ON 

iNO. GO TO ERROR 

J ALL ERRORS TO TRAP TO EMT VECTOR 

I UNIQUE ERROR NUMBER 

I ADDRESS OF ERROR MESSAGE 

(SETUP POINTER TO DATA 

i***TEST INSTRUCTION*** 

jGET FPS 

lis R5 CORRECT 

I YES GO ON 

(NO. GO TO ERROR 

(ALL ERRORS TO TRAP TO EMT VECTOR 



M4 



2455 


011044 


000150 






.UORO 


150 


2456 


011046 


002013 






.UORD 


rPPERR 


2457 


011050 


012705 


001146 


3»: 


MOV 


*TSTL0C*10.R5 


2458 


011054 


012702 


011244 




MOV 


#TS27D'» .R2 


2459 


011060 


004767 


000076 




JSR 


PC.CMEC27 


2460 


011064 


020327 


000000 




CMP 


R3,»0 


2461 


011070 


001403 






BEQ 


4* 


2A62 














2463 


011072 


104000 






ERROR 




2464 


011074 


000151 






.UORO 


151 


2465 


011076 


002013 






.WORD 


rPPERR 


2466 


011100 


012705 


001136 


4»: 


MOV 


♦TSTL0C.R5 


2467 


011104 


170665 


000020 




ABSF 


20(R5) 


2468 


011110 


170203 






STFPS 


R3 


2469 


011112 


020527 


001136 




CMP 


R5,#TSTL0C 


2470 


011116 


001403 






BEQ 


51 


2471 
2472 


011120 


104000 






cRROR 




2473 


011122 


000152 






.WORD 


152 


2474 


011124 


002013 






.UORO 


FPPERR 


2475 


011126 


012705 


001156 


St: 


MOV 


♦TSTL0C»20,R5 


2476 


011132 


012702 


011254 




MOV 


#TS2705,R2 


2477 


011136 


004767 


000020 




JSR 


PC,CHEC27 


2478 


011142 


020327 


000004 




CMP 


R3.*4 


2479 


011146 


001403 






BEQ 


6i 


2480 














2481 


011150 


104000 






ERROR 




2482 


011152 


000153 






.UORO 


155 


2483 


011154 


002013 






.UORO 


FPPERR 


2484 


011156 






6t: 






2485 














2486 








t 






2487 


011156 


000167 


000102 


JMP 


FIN27 


2488 








1 






2489 


011162 


012701 


000004 


CHEC27 : 


MOV 


•4,R1 


2490 


011166 


022522 




1>: 


CHP 


CR5)» ,CR2)» 


2491 


011170 


001403 






BEQ 


2* 


2492 














2493 


011172 


104000 






ERROR 




2494 


011174 


000154 






.UORO 


154 


2495 


011176 


002013 






.WORD 


FPPERR 


2496 


011200 


077106 




2t: 


SOB 


Rl.lt 


2497 


011202 


000207 






RTS 


PC 


2498 








1 






2499 


011204 


1''7777 




TSii700: 


.UORO 


177777 


2500 


011206 


177777 






.UORO 


177777 


2501 


011210 


177777 






.UORO 


177777 


2502 


011212 


177777 






• UORO 


177777 


2503 


011214 


000377 




TS270I: 


.UORO 


577 


2504 


011216 


175436 






.UORO 


175456 




All 


13oA 7 1 






.UORD 


1 w4 t 1 


2506 


011222 


000001 






.UORO 


1 


2507 


011224 


000177 




TS2702: 


.UORO 


177 


2508 


011226 


175436 






.UORO 


175436 


2509 


011230 


136477 






.UORO 


156477 


2510 


011232 


000001 






.UORO 


1 



SEO 0051 



UNIQUE ERROR NUMBER 
ADDRESS OF ERROR MESSAGE 
SETUP POINTER TO DATA 

CHECK IF OAT A IS CORRECT 

CHECK FPS 

OK GO ON 

NO. GO TO ERROR 

ALL ERRORS TO TRAP TO EMT VECTOR 
UNIQUE ERROR NUMBER 
ADDRESS OF ERROR MESSAGE 
SETUP POINTER TO DATA 
♦♦♦TEST INSTRUCTION*^^ 
I GET FPS 
lis R5 CORRECT 
I YES GO ON 
iNO. GO TO ERROR 

I ALL ERRORS TO TRAP TO EMT VECTOR 
! UNIQUE ERROR NUMBER 
I ADDRESS OF ERROR MESSAGE 
(SETUP POINTERS TO DATA 

! CHECK IF DATA IS CORRECT 

I CHECK FPS 

I OK GO ON 

iNO. GO TO ERROR 

{ALL ERRORS TO TRAP TO EMT VECTOR 
I UNIQUE ERROR NUMBER 
lAOORESS OF ERROR MESSAGE 



jINIT COUNTER 
lis DATA CORRECT 
tYES GO ON 
iNO. GO TO ERROR 

J ALL ERRORS TO TRAP TO EMT VECTOR 
{UNIQUE ERROR NUTSER 
{ADDRESS OF ERROR MESSAGE 
{ARE UE DONE 
i RE TURN 



GLOBAL AREAS MACYll 50A(10S2) 15 MAR -84 
KOJllA.MAC 15 MAR -84 15:51 T51 



N4 



16:58 PAGE 52 
TEST ABSF 



2511 


011234 


077777 




TS2703: 


.WORD 


77777 






2512 


011236 


177777 






.WORD 


17/777 






2513 


011240 


177777 






.WORD 


177777 






2514 


011242 


177777 






.WORD 


177777 






2515 


011244 


000377 




TS27D4; 


.WORD 


377 






2516 


01124b 


175436 






.WORD 


175436 






2517 


011250 


136477 






.WORD 


136477 






2518 


011252 


000001 






.WORD 


1 






2519 


011254 


000000 




TS2705: 


.WORD 


0 






2520 


011256 


000000 






.WORD 


0 






2521 


011260 


136477 






.WORD 


136477 






2522 


011262 


000001 






.WORD 


1 






2523 


011264 






FIN27: 










2524 


















2525 


011264 






TSFP30: 










2526 








l*TEST 










2527 








32 


TEST ABSD 






2528 


















2529 


011264 






TST32: 










2530 


011264 


005267 


167514 




INC 


♦TESTN 


{INCREMENT TEST NUMBER 




2531 


011270 


005037 


002122 




CLR 


S«TRPFLG 


1 CLEAR TRAP FLAG 




2532 


011274 


012705 


000200 




MOV 


•200. RS 


1 SETUP TO LOAD FPS 




2533 


011300 


170105 






LOFPS 


R5 


iSET FO-1 




2534 


011302 


012701 


000014 




MOV 


•12.. Rl 


ilNIT COUNTER 




2535 


011306 


012704 


001136 




MOV 


•TSTL0C.R4 


iSETUP POINTER TO TEST LOCATION 


2536 


011312 


012703 


011552 




MOV 


•TSS000.R5 


t SETUP POINTER TO TEST VALUE 


2537 


011316 


012324 




loot: 


MOV 


(RS)»,(R4)» 


jINIT TEST LOCATION 




2538 


011320 


077102 






SOB 


Rl.lOOt 


1 ARE UE DONE 




2539 


011322 


012705 


001136 




MOV 


•TSTLOC.RS 


i SETUP POINTER TO DATA 




2540 


011326 


170615 






ABSD 


CR5) 


l***TEST INSTRUCTION*** 




2541 


011330 


170203 






STFPS 


RS 


iGET FPS 




2542 


011332 


020527 


001136 




CMP 


R5.#TSTL0C 


lis RS CORRECT 




2543 


011336 


001403 






BEQ 


11 


lYES GO ON 




2544 














{NO. GO TO ERROR 




2545 


011340 


104000 






ERROR 




lALL ERRORS TO TRAP TO EHT 


VECTOR 


2546 


011342 


000155 






.WORD 


155 


1 UNIQUE ERROR NUMBER 




2547 


011544 


002013 






.WORD 


FPPERR 


1 ADDRESS OF ERROR MESSAGE 




2548 


011346 


012702 


011602 


11: 


MOV 


•TS300S.R2 


J SETUP POINTER TO DATA 




2549 


011352 


004767 


000152 




JSR 


PC.CHECSO 


J CHECK IF DATA IS CORRECT 




2550 


011356 


020327 


000200 




CMP 


RS.«200 


1 CHECK FPS 




2551 


011362 


001403 






BEQ 


2« 


i OK GO ON 




2552 














iNO. GO TO ERROR 




2553 


011364 


104000 






ERROR 




lALL ERRORS TO TRAP TO EMT 


VECTOR 


2554 


011366 


000156 






.WORD 


156 


(UNIQUE ERROR NUMBER 




2555 


011370 


002013 






.WORD 


FPPERR 


(ADDRESS OF ERROR MESSAGE 




2556 


011372 


012705 


001146 


21: 


MOV 


♦TSTL0C»lO.R5 


(SETUP POINTER TO DATA 




2557 


011376 


170625 






ABSD 


(R5)» 


t»**TEST INSTRUCTION*** 




2558 


011400 


170203 






STFPS 


R3 


(GET FPS 




2559 


011402 


020527 


001156 




CMP 


R5.*TSTl,0C»20 


lis R5 CORRECT 




2560 


011406 


001403 






BEQ 


3< 


(YES GO ON 




2561 














(NO. GO TO ERROR 




2562 


011410 


104000 






ERROR 




(ALL ERRORS TO TRAP TO EMT 


VECTOR 


2563 


011412 


000157 






.WORD 


157 


(UNIQUE ERROR NUMBER 




2564 


011414 


002013 






.WORD 


FPPERR 


(ADDRESS OF ERROR MESSAGE 




2565 


011416 


012705 


001146 


3*: 


MOV 


•^STL0C»10.R5 


(SETUP POINTERS TO DATA 




2566 


011422 


012702 


011612 




MOV 


•TSS0D4.R2 







GLOBAi. AREAS MAC>11 50A(1052) 
KOJUA.riAC 15 MAR 64 15: 51 



15 MAR S4 16:5S PAGi 
T32 TEST ABi 



2567 
256* 
25*>9 
2570 
2571 
2572 
2575 
2574 
2575 
^576 
2577 
2578 
2579 
2580 
2581 
2582 
2585 
2584 
2585 
2586 
2587 
2588 
2569 
2590 
2591 
2592 
2593 
2594 
2595 
2596 
2597 
2596 
2599 
2600 
2601 
2602 
2603 
2604 
2605 
2606 
2607 
2606 
2609 
2610 
2611 
2612 
2613 
2614 
2615 
2616 
2617 
2616 
2619 
2620 
2621 
2622 



011426 
011432 
011436 

011440 
011442 
011444 
011446 
011452 
011456 
011460 
011464 

011466 
011470 
0114 72 
0114 74 
011500 
011504 
011510 
011514 

011516 
011520 
011522 
011524 



004 767 
020327 
001403 

104000 

000160 
002013 
012705 
170665 
170203 
020527 
001403 

104000 
000161 
002013 
012705 
012702 
004767 
020327 
001403 

104000 

000162 
002013 



011524 000167 



011530 
011534 
011536 

011540 
011542 
011544 
011546 
011550 

011552 
011554 
011556 
011560 
011562 
011564 
011566 
011570 
011572 
011574 
011576 
011600 
011602 
011604 
011606 
011610 
011612 



012701 
022522 
001403 

104000 
000163 
002013 
077106 
000207 

177777 
177777 
177777 
177777 
000377 
175436 
1S6477 
000001 
000177 
175436 
136477 
000001 
077777 
177777 
177777 
177777 
000577 



000076 
000200 



001136 
000020 

001136 



001156 
011622 
000020 
000204 



4ti 



51: 



61: 



000102 
000004 



JSR 

CUP 

BEQ 

ERROR 

.WORD 

.WORD 

MOV 

ABSO 

STFPS 

CMP 

BEQ 

ERROR 

.UORO 

.WORD 

MOV 

MOV 

JSR 

CMP 

BEQ 

ERROR 
.UORO 
.UORD 



JMP 



CHEC30: MOV 
II: CMP 
BEQ 



21; 



ERROR 
.MORD 
.UORO 

soe 

RTS 



TS3000: .UORO 
.UORO 
.UORO 
.UORO 

TSSOOl: .UORO 
.UORO 
.UORO 
.UORO 

TS3O02: .UORO 
.UORO 
.UORO 
.UORO 

TS5003: .UORO 
.UORO 
.UORD 
.UORO 

TS3004: .UORO 



55 



PC.CHEC50 

R3.0200 

4» 



160 

FPPERR 
•TSTL0C.R5 
20CR5) 
R3 

R5.#TSTL0C 
5» 



161 

rPPERR 

♦TSTL0C»20.R5 

*TS3005.R2 

PC.CHEC30 

R3.«204 

61 



162 

rPPERR 



FINSO 
•4.R1 

(R5)..(R2). 
21 



163 

FPPERR 
Rl.lt 

PC 

177777 
177777 
177777 
177777 
377 

175456 
156477 

1 

177 

1754 56 
156477 
1 

77777 

177777 

177777 

177777 

577 



SEQ 0053 



CHECK IF DATA IS CORRECT 

CHECK TPS 

OK GO ON 

NO. GO TO ERROR 

ALL ERRORS TO TRAP TO EI1T VECTOR 

UNIQUE ERROR NUMBER 

ADDRESS OF ERROR MESSAGE 

SETUP POINTER TO DATA 

•••TEST INSTRUCTION^^^ 

GET FPS 

IS R5 CORRECT 

YES GO ON 

NO. GO TO ERROR 

ALL ERRORS TO TRAP TO EMT VECTOR 
[UNIQUE ERROR NUMBER 
lAOORESS OF ERROR MESSAGE 
I SETUP POINTERS TO DATA 

I CHECK IF DATA IS CORRECT 

I CHECK FPS 

I OK GO ON 

iNO. GO TO ERROR 

I ALL ERRORS TO TRAP TO EMT VECTOR 
■UNIQUE ERROR NUMBER 
lAOORESS OF ERROR MESSAGE 



lINIT COUNTER 
lis DATA CORRECT 
iVES GO ON 
iNO. CO TO ERROR 

lALL ERRORS TO TRAP TO EMT VECTOR 
{UNIQUE ERROR HMW* 
lAOORESS OF ERROR MESSAGE 
lARE UE DONE 
I RE TURN 



«?625 


01 lfel4 


175436 




2624 


011616 


136477 




2625 
2626 


011620 


OOOOOl 




011622 


000000 




2627 


011624 


OOOOOO 




2628 


011626 


OOOOOO 




2629 


011630 


OOOOOO 




2630 


011632 






26S1 








2632 


011632 






2633 








2t>34 








2635 








2636 


011632 






2637 


011632 


005267 


167146 


2636 


01 1636 


005037 


002122 


2639 


011642 


013746 


000004 


2640 


011646 


012737 


011764 


2641 


011654 


012702 


000200 


2642 


011660 


170102 




2643 


011662 


170527 


000005 


2644 


011666 


000240 




2645 


011670 


000240 




2646 


011672 


000240 




2647 


011674 


170203 




2648 


011676 


020327 


000204 


2649 


011702 


001403 




2650 


011704 


104000 




2651 


011706 


000164 




2652 


011710 


002013 




2653 








2654 


011712 


012702 


011664 


2655 


011716 


022227 


000005 


2656 


011722 


001403 




2657 


011724 


104000 




2658 


011726 


000165 




2659 


011730 


002013 




2660 








2661 


011732 


012701 


000003 


2662 


011736 


022227 


000240 


2663 


011742 


001403 




2664 


011744 


104000 




2665 


011746 


000166 




2666 


011750 


002013 




2667 








2668 


011752 


077107 




2669 


011754 


012637 


000004 


2670 








2671 








2672 


011760 


000167 


000010 


2673 








2674 


011764 






2675 


011764 


104000 




2676 


011766 


000167 




2677 


011770 


00201; 




2678 









.WORD 
.WORD 
.WORD 
TS3O05: .WORD 
.WORD 
.WORD 
.UORO 

FIN30: 

TSrP31: 

|*TEST 33 
1 1 
TST335 

INC 
CLR 

nov 
nov 

MOV 
LOTPS 
TS031: TSTO 
NOP 
NOP 
NOP 
STFPS 
CMP 
BEQ 
ERROR 
.UORO 
.UORO 



1«; 



2»: 
3fi 



I 



TSF31S 



NOV 

CHP 

BEQ 

ERROR 

.WORD 

.WORD 

HOV 

C»1P 

BEQ 

ERROR 

.WORD 

.UORO 

SOB 
NOV 



JMP 



ERROR 
.WORD 
.UORO 



SEQ O0S4 

175436 
156477 

1 
0 
0 
0 
0 



TEST rOST SOP MODE 2 GR7 



ITESTN 

BtTRPrtG 

S«4.-(SP) 

#TSr51.8«4 

•200. R2 

R2 

•5 



•INCREMENT TEST NUMBER 
iCLEAR TRAP FLAG 
I SAVE TIMEOUT VECTOR 
t SETUP NEU VECTOR 
I SETUP TO LOAD TPS 
jSET FO-l 

i***TEST INSTRUCT ION* 



R3 

R3.*204 
II 

164 

FPPERN 

•TS0S1*2.R2 

(R2)>.*5 

2t 

16S 

FPPCRR 
•3.RI 

(R2>*.«240 
41 

166 

FPPERR 

Rl.SI 
(SP)..S»« 



iCET FPS 
iCMECK FPS 
lOK GO ON 

I ALL ERRORS TO TRAP TO EMT VECTOR 
t UNIQUE ERROR NUMBER 
I ADDRESS OF ERROR rcsSAGE 
iNO GO TO ERROR 

•SETUP POINTER TO DATA 
tIS DATA CORRECT 
iVES GO ON 

I ALL ERRORS TO TRAP TO EMT VECTOR 
t UNIQUE ERROR NU»«ER 
1 ADDRESS OF ERROR MESSAGE 
iNO GO TO ERROR 

iINIT COUNTER 
lis DATA CORRECT 
iTES CO ON 

tALL ERRORS TO TRAP TO EMT VECTOR 
•UNIQUE ERROR NUMBER 
•ADDRESS OF ERROR MESSAGE 
iNO GO TO ERROR 

|ARE UE DONE 
•RESTORE VECTOR 



F1N51 



167 

FPPERR 



•ALL ERRORS TO TRAP TO EMT VECTOR 
iL*<IQUE ERROR NUMBER 
•ADDRESS OF ERROR MESSAGi 
I ODD ADDRESS TRAP 



«?679 
5680 


Oil 772 


000006 




1 


RTT 


2661 


011774 






riN31: 




2602 








1 




2663 


011774 






tsrP32; 




2684 












2665 








I'TEST 


34 


2666 












2667 


011774 






TST34. 




2666 


011774 


005267 


167004 




INC 


2669 


012000 


005037 


002122 




CLR 


2690 


012004 


005005 






CLR 


2691 


012006 


170105 






LOFPS 


2692 


012010 


012701 


000014 




NOV 


2695 


012014 


012704 


001136 




nov 


2694 


012020 


012703 


012210 




NOV 


26«»5 


012024 


012324 




1001: 


NOV 


2696 


012026 


077102 






SOB 


2697 


012030 


170767 


167102 




NEGP 


2696 


012034 


170203 






STFPS 


2699 


012036 


012705 


001136 




NOV 


2700 


012042 


012702 


012240 




NOV 


2701 


012046 


004767 


000114 




jSR 


2702 


012052 


020327 


000000 




CNP 


2703 


012056 


001403 






BEQ 


2704 












2705 


012060 


104000 






ERROR 


2706 


012062 


000170 






.UQRO 


2707 


012064 


002013 






.UORO 


2708 


012066 


170767 


167054 


11: 


NEGT 


2709 


012072 


170203 






STFPS 


2710 


012074 


012705 


001146 




NOV 


2711 


012100 


012702 


012250 




NOV 


2712 


012104 


004767 


000056 




JSR 


2715 


012110 


020327 


000010 




CNP 


2714 


012114 


001403 






BEQ 


2715 












2716 


012116 


104000 






ERROR 


2717 


012120 


000171 






.UORO 


2718 


012122 


002013 






.UORO 


2719 


012124 


170767 


167026 


2*: 


NEGF 


2720 


012130 


170203 






STfPS 


2721 


012132 


012705 


001156 




NOV 


2722 


012136 


012702 


012260 




NOV 


2725 


012142 


004767 


000020 




JSR 


2724 


012146 


020327 


000004 




CNP 


2725 


012152 


001403 






BEQ 


2726 












2727 


012154 


104000 






ERROR 


2728 


012156 


000172 






.UORO 


2729 


012160 


002013 






.UORO 


2730 


012162 






3t: 




2731 












2732 


012162 


000167 


000102 




JNP 


2733 












2734 


012166 


012701 


000004 


CHECS2: 


NOV 



OP NODE 2 GR7 



SEQ 0055 



I RE TURN 



TEST NEGF 



tTESTN 

B*TRPFLG 

RS 

RS 

•12.. Rl 

#TSTL0C.R4 

#TS3200.RS 

(R3)».(R4). 

Rl.lOOt 

TSTLOC 

RS 

•TSTLOC. R5 

•TSS20S.R2 

PC.CMEC32 

RS.^O 

II 



170 

FPPERR 
TSTLOC* 10 
RS 

♦TSTLOC* 10.R5 

•TS3204.R2 

PC.CHEC52 

R3.*10 

2» 



171 

FPPERR 
TSTLOC •20 
R3 

♦TSTLOC ♦20. R5 

•TS320S.R2 

PC.CHECS2 

RS.^4 

31 



172 

FPPERR 



iXNCRENENT TEST NUNBER 
I CLEAR TRAP FLAG 
I SETUP TO LOAD FPS 
I SET FD-0 
lINIT COUNTER 

I SETUP POINTER TO TEST LOCATION 
|3ETUP POINTER TO TEST VALUE 
tINIT TEST LOCATION 
(ARE UE OONE 
i*«*TEST INSTRUCT ION* 
iCET FPS 

I SETUP POINTERS TO OATA 

•CHECK IF DATA IS CORRECT 

•CHECK FPS 

lYES GO ON 

iNO. GO TO ERROR 

I ALL ERRORS TO TRAP TO EMT VECTOR 
t UNIQUE ERROR NUNBER 
lAOORESS OF ERROR rCSSAGE 
i«**TEST INSTRUCTION*** 
iGET FPS 

•SETUP POINTERS TO DATA 

iCHECK IF OATA IS CORRECT 

iCHECK FPS 

t OK GO ON 

tNO. GO TO ERROR 

{ALL ERRORS TO TRAP TO ENT VECTOR 
(UNIQUE ERROR NUNBER 
lAOORESS OF ERROR NESSACE 
t***TEST INSTRUCT ION** • 
iGET FPS 

I SETUP POINTERS TO OATA 

I CHECK IF DATA IS CORRECT 

(CHECK FPS 

t OK GO ON 

(NO. CO TO ERROR 

lALL ERRORS TO TRAP TO ENT VECTOR 
•UNIQUE ERROR NU»«ER 
lAOORESS OF ERROR NESSAGE 



FINS2 
♦4.R1 



(INIT COUNTER 



GLOBAL ARFAS 
KDJllA.HAC 



MACni 30A(1052) 
15 MAR d4 15:51 



15 MAR 



5EQ 0056 





0121 72 


022322 




£ 1 


Al ^ 4 7A 


AAl AAV 

001403 




£l5( 








e ' 50 


Al 1 7^ 

0121 lO 


• AAA 

104000 






Ol££00 


AAAl 7V 

OOOl 73 






Al ^^A^ 

O 12202 


AA3A1 X 

0O2O13 






A 4 ^^AA 

Ol2cv* 


A771 e\£L. 

SI 1 ( lUO 




O 7^ 3 


Al ^^AA 

0122UO 


AAA3A7 

OOv20 7 




37^ » 








07^ A 


A1 A 


1 7AAAA 
1 IKAAAJ 






Al ^ 

01221e 


AAS^A 1 

003341 






012214 


1 77777 
X 1 1 1 1 1 




37^ 7 




1 7371 A 
1 IC ' lO 




^7^ A 


Al 533A 


A7AAAA 






Al 331^ 


AAX^A 1 




3 7CA 


Al 333^ 


1 77777 
X 1 1 1 1 1 




37^1 
e '31 


Al 333A 


1 7371 rt 
Lie 1 lU 




c r 3^ 


Al 33TA 


<W11 77 
UUUl 1 f 




C '33 


Al 33'X3 


1 A/V%AA 




c 'D* 


Al 33YA 


1 77777 
X 1 1 1 1 1 




t 'DD 


Al 33TA 


1 77A07 




37Ci^ 


Al 33AA 


A YAAAA 




e f 3 I 


Al 33A3 

Ulcere 


AAT^A 1 




c f 30 


Al 33AA 


1 77777 
L 1 1 1 1 1 






Al 33^£. 


1 7371 A 
1 IClXQ 




c roU 


Al 33QA 


1 7AAAA 




37A1 


Al 33^3 

Ule<:3c 


AAX^A 1 




3 7 A3 


Al 33QA 
UlCC3* 


1 77777 
XI 1 1 1 1 






A 1 

012e30 


1 7371 A 

172710 




37i^ 


Al 3 3^ A 


AAAAAA 

oooooo 




37<^^ 
c r03 


O 12262 


OOOOOO 






012264 


1 7 7777 

XI II 11 




37^7 


Al 3*>££ 

O 12266 


1 7 7/W\7 

177007 




37&S 


Al 337A 






37AQ 








377ft 


Al 337A 






3771 








3773 








377X 










01 337n 






377^ 


Al 337A 

V lee ' \> 


AA^3&7 




c ( ' o 


ftl 337A 
vice f ^ 


AA^AX7 
SAJjMS I 


AA04 


3777 


Al 3XAA 


Al 37A^ 

Vie 'v3 




377« 

Clio 


Al 3T/1A 


1 7A1 A^ 
1 rUl03 




377Q 
c 1 1^ 


Al 3XA£ 


Al 37A1 

Vie mx 


AAAA4 ^ 




ftl 3X1 3 
VleSle 


Al 37AA 

Vie f 04 


UUllOO 


c ' ox 


01 3T1#« 

vie^iv 


ni 37rtx 
vie ' W3 






01 3X33 

vie^ee 


01 3X3A 

vieoe^ 






vieOc^ 


ft771rt3 
U r r lUe 




3 7 Ad 


Ol 3X3A 
vie^eO 


1 fU » O » 




2785 


013553 


1 ■ vev J 




2786 


012534 


012705 


001136 


2787 


012340 


012702 


012536 


2788 


012344 


004767 


000114 


2789 


012350 


020327 


000200 


2790 


012354 


001403 





Id 



2li 



TSS200 



TS3201 



TS3203 
TS3204 
TSS205 
FXNS2: 



CMP 
BEQ 

ERROR 
.UORD 
.UORO 

SOB 

RTS 

: .WORD 
.WORD 
.WORD 
.WORD 
: .WORD 
.WORD 
.UORO 
.WORD 
.WORD 
.WORD 
.WORD 
.UORO 
: .UOPD 
.WORD 
.UORO 
.UORO 
: .UORD 
.UORO 
.UORO 
UORD 
UORO 
UORD 
UORO 
UORO 



(R5)..(R2). 
21 



173 

FPPERR 

Rl.l* 

PC 

170000 

3541 

177777 

172710 

70000 

3541 

177777 

172710 

177 

100000 

177777 

177007 

70000 

3541 

177777 

172710 

170000 

5541 

177777 

172710 

0 

0 

177777 
177007 



TSFPSJj 
I •TEST 55 
TSTS5: 



TEST NEGO 



1001: 



lis DATA CORRECT 

I YES GO ON 

I NO, GO TO EAROR 

»ALL ERRORS TO TRAP TO EMT VECTOR 

I UNIQUE ERROR NUMBER 

I ADDRESS Of ERROR MESSAGE 

I ARE WE DONE 

(RETURN 



INC 


•TESTN 


t INCREMENT TEST NUMBER 


aR 


MTRPTLC 


1 CLEAR TRAP FLAG 


nov 


«200.RS 


J SETUP TO LOAD FPS 


LOFPS 


R5 


iSET FO-1 


HOV 


•12.. Rl 


lINIT COUNTER 


HOV 


•TSTLX.R4 


» SETUP POINTER TO TEST LOCATION 


HOV 


•TS5»>0.R5 


1 SETUP POINTER TO TEST VALUE 


HOV 


CR5)*.(R4)» 


tlNIT TEST LOCATION 


SOB 


Rl.lOOt 


lARE UE DONE 


NEGO 


TSTLOC 


l*«»TEST INSTRUCTION*** 


STFPS 


R3 


iCET FPS 


HOV 


•TSTLOC. R5 


1 SETUP POINTERS TO DATA 


HOV 


•TS530S.R2 




JSR 


PC.CHEC53 


iCMECK IF DATA IS CORRECT 


CMP 


R3.*200 


1 CHECK FPS 


BEQ 


1< 


lOK CO ON 



GLOBAL AREAS MACrll 30A(1052) 15 MAR 84 16:58 PAGt 
KOJllA.MAC 15 MAR 64 15:51 T55 TEST NEC 



P7Q1 










012S56 


104000 




c ■ ~v 




0001 74 




P794 








P795 


VAC JO"* 


170767 


166556 


P796 

C ■ TO 




1 70205 

A * VC 








012705 

VAC f V J 


001146 

W A A^ V 


2798 


012576 


O 12702 

VAC • VC 


012546 




012402 


004767 


000056 

W W JV 


2800 


O 12406 


020327 


000210 

WVfc A V 


2801 


012412 

V JkC^ <I>C 


001403 




2802 










01P414 


104000 




2804 


012416 

V AC~ A V 


000175 






012420 

V AC^C V 


002013 

WC V A V 




2806 


012422 


170767 


166530 


2807 


012426 


170203 




2808 


012430 


012705 


001156 


2809 


012434 


012702 


012556 


2810 


012440 


004767 


000020 


2811 


012444 


020327 


000204 


2812 


012450 


001403 




2813 








2814 


012452 


104 OOO 

A V^ VW 




2815 


012454 


000176 

WVA ■ V 




2816 


012456 


002013 

WBi V A** 




2817 


012460 






2818 








2819 


012460 


000167 

WVAw • 


000102 

VWX VC 


2820 








2821 


012464 

W AC * w ■ 


012701 


000004 


2822 


012470 


022522 

VCC ■'CC 




2823 


012472 


001403 




2824 








2825 


012474 


104 OOO 

A V^ WV 




2826 


012476 


000177 




2827 


012500 


002013 




2828 


012502 


077106 




2829 


012504 


000207 




2830 








2831 


012506 


170000 




2832 


012510 


003541 




2833 


012512 


177777 




2834 


012514 


172710 




2835 


012516 


070000 




2836 


012520 


003541 




2837 


012522 


177777 




2838 


012524 


X 72710 




2839 


012526 


000177 




2840 


012530 


100000 

A WWW 




2841 


012532 


177777 




2842 


012534 


177007 




2843 


012SS6 


070000 




2844 


012540 


003541 




2845 


012542 


177777 




2846 


012544 


172710 





It: 



21: 



3»: 



ERROR 

.WORD 

.WORD 

NEGO 

STFPS 

MOV 

MOV 

JSR 

CMP 

BEQ 

ERROR 

.WORD 

.WORD 

NEGO 

STFPS 

MOV 

MOV 

JSR 

CMP 

BEQ 

ERROR 
.HORO 
.UORO 



JMP 



CHECS5: nOV 
II: CMP 
BEQ 



2ti 



ERROR 

.UORO 

.UORO 

SOB 

RTS 



TSSSOO: .UORO 
.UORD 
.UORO 
.UORO 

TS5S01: .UORO 
.UORO 
.UORD 
.UORO 

TS5302I .UORO 
.UORO 
.UORO 
.UORO 

TSSS05: .UORO 
.UORD 
.UORO 
.UORD 



NO. GO TO ERROR 

ALL ERRORS TO TRAP TO EMT VECTOR 
UNIQUE ERROR NUMBER 
ADDRESS or ERROR MESSAGE 
•♦♦TEST INSTRUCTION^^^ 
GET FPS 

SETUP POINTERS TO DATA 

CHECK IF DATA IS CORRECT 

CHECK FPS 

OK GO ON 

NO. GO TO ERROR 

ALL ERRORS TO TRAP TO EMT VECTOR 
I UNIQUE ERROR NUMBER 
I ADDRESS OF ERROR MESSAGE 
[♦♦♦TEST INSTRUCTION^** 

I GET FPS 

I SETUP POINTERS TO DATA 

1 CHECK IF DATA IS CORRECT 

I CHECK FPS 

I OK GO ON 

iNO. GO TO ERROR 

(ALL ERRORS TO TRAP TO EMT VECTOR 

I UNIQUE ERROR NUMBER 

I ADDRESS OF ERROR MESSAGE 



lINIT COUNTEF. 
J IS DATA CORRECT 
{YES GO ON 
(NO. GO TO ERROR 

I ALL ERRORS TO TRAP TO EHT VECTOR 

•UNIQUE ERROR NUMBER 

t ADDRESS OF ERROR ^CSSAGE 

(ARE UE DONE 

{RETURN 



GLOBAL AREAS MACtll 30A(1052) 
KDJllA.MAC 15-MAR-84 15:51 



CO** / 




X 1 WW 




2646 


012550 


003541 






O 12552 


177777 












P851 


012556 


oooooo 

www 




2852 


012560 


oooooo 

www 




2853 


012562 


oooooo 

www 




2854 


01PS64 


oooooo 

www 




2855 


012S66 






2856 








2857 


012566 






2858 








2859 








2860 








2861 


012566 






2862 


012566 


005267 


166212 


2663 


012572 


012704 


047600 


2864 


012576 


170104 




2865 


012600 


012702 


001106 


2866 


012604 


172407 




2867 








2868 


012606 


170201 




2669 


012610 


022701 


147600 


2870 


012614 


001403 




2871 


012616 


104000 




2872 


012620 


000200 




2873 


012622 


002013 




2874 








2875 


012624 


170512 




2876 


O 12626 


022722 


O000O2 


2877 


012632 


001403 




2878 


012634 


104000 




2879 


012636 


000201 




2880 


012640 


002013 




2881 








2882 


012642 


022722 




2883 


012646 


00140S 




2884 


012650 


104000 




2885 


012652 


000202 




2886 


012654 


002013 




2887 








2888 


012656 






2889 








2890 








2891 


012656 






2892 








2893 








2894 








2895 


012656 






2896 


012656 


005267 


166122 


2897 


012662 


012701 


001126 


2898 


012666 


012704 


001176 


2899 


012672 


012702 


047750 


2900 


012676 


170102 




2901 


012700 


172424 




2902 


012702 


170203 





Gb 



iEQ 0058 



TS5304: .UORD 
.WORD 
.WORD 
.WORD 

TS3305: .WORD 
.WORD 
.WORD 
.UORO 

riN33: 
MTSRCMO: 



170000 

5541 

177777 

172710 

0 

0 

0 

0 



J •TEST 



36 



TEST LOO MOOE 0. ILLEGAL AC 7 



TST36: 



It: 



2t: 



3t: 



4t; 



ZNC 


ITESTN 


MOV 


•47600.R4 


LOFPS 


R4 


MOV 


•RECFEC.R2 


LOO 


R7.AC0 


STFPS 


Rl 


CMP 


«147600.R1 


BEQ 


2t 


ERROR 




.WORD 


200 


.UORO 


FPPERR 


STST 


(R2) 


CMP 


•2.{R2}* 


BEQ 


SI 


ERROR 




.WORD 


201 


.UORO 


rppcm 


CMP 


#11. (R2)* 


BEQ 


4t 


ERROR 




.UORD 


202 


.UORD 


FPPERR 



{INCREMENT TEST NUMBER 
I SETUP FPP STATUS 
iLOAO FP STATUS 
I POINT TO RECEIVED FEC MEMORY 
I ♦TEST INSTRUCTION 
iLOAO ACO FROM ILLEGAL AC7 
I SAVE FPP STATUS 
I VERIFY FER BIT SET 
{BRANCH IF GOOD ERROR COHCITION 
lALL ERRORS TO TRAP TO EMT VECTOR 
{UNIQUE ERROR NUMBER 
{ADDRESS OF ERROR MESSAGE 
{THE FER BIT DIONT SET 

{SAVE FEC AND FEA 
{VERIFY FEC CONTENTS 
{BRANCH IF GOOD 

{ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NU»«ER 
{ADDRESS OF ERROR MESSAGE 
(FEC NE 2 r OPCODE ERROR) 

(VERFXY FEA CONTENTS 
(BRANCH FX GOOD 

(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 
(FEA NOT CORRECT ERROR ADDRESS 



ML0DM2: 
I i TEST 57 
TSTS7: 

INC 

MOV 

MOV 

MOV 

LOFPS 

LOO 

STFPS 



TEST LDD M0DE2 



•TESTN 
•RECDST.Rl 
#TA81.R4 
♦47750. R2 

R2 

(R4)».AC0 
R5 



(INCREMENT TEST NUMBER 

(POINT TO RECEIVED DATA LOCATION 

(POINT TO GOOD DATA 

(LOAD GOOD STATUS 

I LOAD FPP STATUS - DOUBLE. ID 

l**«TEST INSTRUCTION - MODE 2**« 

{SAVE TEST FPP STATUS 
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2903 


012704 


174021 








STO 


ACO.(Rl)* 


iSAVE TEST RESULT MODE 2 


2904 


012706 


020203 








CMP 


R2.RS 


iVERIFY FPP STATUS 


2905 


012710 


001403 








BEQ 


11 


i BRANCH IF GOOO 


2906 


012712 


104000 








ERROR 




lALL ERRORS TO TRAP TO EMT VECTOR 


2907 


012714 


000203 








.U(^0 


203 


1 UNIQUE ERROR NUMBER 


2908 


012716 


002013 








.UORO 


FPPERR 


lAOORESS OF ERROR MESSAGE 


2909 
















iBAO FPP STSTUS 


2910 


012720 


022704 


001206 




11: 


CMP 


•TAB1»10.R4 


iVERFlY AUTO-INCR 


2911 


012724 


001403 








BEQ 


2« 


(BRANCH IF GOOO 


2912 


012726 


104000 








ERROR 




lALL ERRORS TO TRAP TO EMT VECTOR 


2913 


012730 


000204 








.UORO 


204 


•UNIQUE ERROR NUMBER 


2914 


012732 


002013 








.WORD 


FPPERR 


lAOORESS OF ERROR MESSAGE 


2915 














iBAO 


AUTO-INCR 


2916 


012734 


012704 


001176 




2t: 


MOV 


•TA61,R4 


iPOINT TO RECEIVED DATA 


2917 


012740 


162701 


000010 






SUB 


♦10. Rl 


t RE TURN Rl TO PROPER VALUE 


2918 


012744 


004767 


167176 






JSR 


R7,0ATVER 


iVERFlY OATA FROM FPP 


2919 


012750 


005767 


166064 






TST 


COUNT 


iSEE IF COUNTER -0 


2920 


012754 


001403 








BEQ 


31 


(BRANCH IF GOOO COMPARE 


2921 
















tSAO DATA FROM FPP 


2922 


012756 


104000 








ERROR 




lALL ERRORS TO TRAP TO EMT VECTOR 


2923 


012760 


000205 








.UORD 


205 


t UNIQUE ERROR NUMBER 


2924 


012762 


002013 








.UORO 


FPPERR 


lAOORESS OF ERROR MESSAGE 


2925 


012764 








31: 








2926 


















2927 










1 








2928 


012764 








MLOOMS: 








2929 


















2930 










i*TEST 


40 


TEST LOO MODE S 




2931 


















2932 


012764 








TST40: 








2933 


012764 


005267 


166014 






INC 


ITESTN 


(INCREMENT TEST NUrflER 


2934 


012770 


012737 


001126 


001140 




MOV 


«AEC0ST.8*TSTL0C*2 


iPOINT TO RECEIVEO DATA LOCATION 


2935 


012776 


012701 


001140 






MOV 


♦TSTL0C»2.R1 


iSETUP STO IN MODE 3 


2936 


013002 


012737 


001206 


001136 




MOV 


#TIIB2.»trSTL0C 


(POINT TO OATA TMlE 


2937 


013010 


012704 


001136 






nov 


*TSrL0C.R4 


(POINT TO GOOD DATA 


2938 


013014 


012702 


047750 






MOV 


•47750.R2 


iLOAD GOOD STATUS 


2939 


013020 


170102 








LOFPS 


R2 


tLOAO FPP STATUS • DOUBLE. 10 


2940 


013022 


172434 








LOO 


8(R4)*.AC0 


t*«*TEST INSTRUCTION • MODE 2*** 


2941 


013024 


170203 








STFPS 


RS 


(SAVE TEST FPP STATUS 


2942 


013026 


174031 








STO 


ACO.BCRl)* 


tSAVE TEST RESULT IN MODE 3 


2943 


013030 


022703 


047740 






CMP 


M7740.R5 


(VERIFY FPP STATUS 


2944 


013034 


001403 








BEQ 


It 


iBRAHCH IF GOOD 


2945 


013036 


104000 








EMOR 




(ALL ERRORS TO TRAP TO EMT VECTOR 


2946 


013040 


000206 








.UORO 


206 


(UNIQUE ERROR NUMBER 


2947 


013042 


002013 








.UORO 


FPPERR 


(ADDRESS OF ERROR MESSAGE 


2948 
















(BAD FPP STATUS 


2949 


013044 


022704 


001140 




11: 


CMP 


•TSTL0C»2.R4 


(VERFIV AUTO-INCR 


2950 


013050 


001403 








BEQ 


2« 


iBAO AUTO -DEC ON LOO 


2951 


013052 


104000 








ERROR 




(ALL ERRORS TO TRAP TO EMT VECTOR 


2952 


013054 


000207 








.UORO 


207 


(UNIQUE ERROR NUMBER 


2953 


013056 


002013 








.UORO 


FPPERR 


(ADDRESS OF ERROR MESSAGE 


2954 
















(BAD AUTO -INC 


2955 


013060 


022701 


001142 




2«: 


CMP 


•TSTL0C»4.,<1 


1 TEST STO AUTO-INC 


2956 


013064 


001403 








BEQ 


31 


(BRANCH IF GOOD 


2957 


013066 


104000 








ERROR 




(ALL ERRORS TO TRAP TO EMT VECTOR 


2958 


013070 


000210 








.WORD 


210 


iUNIQLC ERROR NUMBER 
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IS MAR 



tIo 



EQ OOhO 



^959 


013072 


002013 






.UORO 


rpPERR 




i ADDRESS 0^ ERROR MESSAGE 


2960 
















iBAD AUTO INCR 


2961 


015074 


012704 


001206 




MOV 


•TAB2.R4 




J POINT TO RECEIVED DATA 


2962 


015100 


012701 


001126 




MOV 


«REC0ST.R1 




iPOINT TO RECEIVED DATA 


2965 


015104 


004767 


167036 




JSR 


R7.0ATVER 




IVERFIY DATA FROM FPP 


2964 


015110 


005767 


165724 




TST 


COUNT 




iSEE IF COUNTER -0 


2965 


015114 


001405 






BEQ 


41 




i BRANCH IF GOOD COMPARE 


2966 


015116 


104000 






ERROR 






{ALL ERRORS TO TRAP TO EMT VECTOR 


2967 


015120 


000211 






.WORD 


211 




ilMIQUE ERROR NUMBER 


2968 


015122 


002015 






.WORD 


rPPERR 




(ADDRESS OF ERROR MESSAGE 


2969 
















iBAD DATA FROM FPP 


2970 


015124 






4$: 










2971 


















2972 


013124 






rtLDOm: 










2975 


















2974 








t*TEST 


41 


TEST LOF. STD 


MODE 4 




2975 


















2976 


015124 






TST41: 










2977 


015124 


005267 


165654 




ZNC 


ITESTN 




i INCREMENT TEST NUMBER 


2978 


013150 


012701 


001132 




MOV 


•REC0ST»4.R1 




iPOINT TO RECEIVED DA' A LOCATION 


2979 


015134 


012704 


001222 




MOV 


•TABS»4.R4 




tPOINT TO GOOD DATA 


2960 


013140 


012705 


001256 




MOV 


*TA86.R5 




t CLEAR OUT ACO 


2981 


013144 


170127 


000200 




LOFPS 


•200 




tSET TO DOUBLE 


2982 


013150 


172415 






LOO 


(R5).AC0 




tACO-0 


2985 


013152 


012702 


047550 




NOV 


•475S0.R2 




iLOAO GOOD STATUS FLOATING 


2964 


013156 


170102 






LOPPS 


R2 




tLOAO FPP STATUS • DOUBLE. ID 


2985 


013160 


172444 






LOT 


-(R4).AC0 




t«TEST INSTRUCTION - MODE 4 


2966 


013162 


170203 






STFPS 


R5 




iSAVE TEST FPP STATUS 


2987 


013164 


012702 


047750 




MOV 


M77S0.R2 




iSET <0 DOUBLE MODE 


2968 


013170 


170102 






LOTPS 


R2 




iSET FPP TO DOUBLE 


2969 


013172 


174041 






STD 


ACO.-(Rl) 




tSAVE TEST RESULT 


2990 


015174 


022703 


047540 




Ct» 


•47540.RS 




iVERIFT FPP STATUS 


2991 


015200 


001403 






BEQ 


I* 




iBRANCM IF GOOD 


2992 


015202 


104000 












lALL ERRORS TO TRAP TO EMT VECTOR 


2995 


015204 


000212 






.UORO 


212 




t UNIQUE ERROR NUMBER 


2994 


015206 


002013 






.UORO 


FPPERR 




i ADDRESS OF ERROR rcSSAGE 


2995 
















(BAD FPP STATUS 


2996 


015210 


022704 


001216 


It: 


CHP 


•TABS»R4 




iVERFjY AUTO-OEC 


2997 


015214 


001403 






8E0 


2t 




{BRANCH IF GOOD 


2998 


015216 


104000 






ERAOft 






lALL ERRORS TO TRAP TO EMT VECTOR 


2999 


015220 


000213 






.UORO 


21S 




t UNIQUE ERROR NUMBER 


5000 


015222 


002013 






.UORO 


FPPERR 




1 ADDRESS OF ERROR MESSAGE 


5001 
















iBAO AUTO- INCR 


5002 


015224 


012704 


001216 


21: 


HOV 


•TA83.R4 




1 POINT TO RECEIVED DATA 


5005 


015250 


004767 


166712 




JSR 


R7,0ATVER 




iVERFlY DATA FROn FPP 


3004 


015234 


005767 


165600 




TST 


COUNT 




J SEE IF COUNTER -0 


5005 


013240 


001403 






BEQ 


51 




1 BRANCH IF GOOD COMPARE 


5006 


015242 


104000 






ERROR 






lALL ERRORS TO TRAP fQ EMT VECTOR 


3007 


015244 


000214 






.UORO 


CI* 

FPPERR 




1 UNIQUE ERROR NUMBER 


3008 


013246 


002013 






.UORO 




(ADDRESS OF ERROR rCSSAGE 


3009 














(BAD DATA FROM FPP 


5010 


015250 






31: 










5011 


















5012 


015250 






HL00H5: 










5013 


















3014 








••TEST 


42 


TEST LOO MOOF 


5 





J5 
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nu V 
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X rvxvc 
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RP 


il HAn POO CTATlIC Hi^ Oi C m 


JVC J 


vx J<jw 


1 7P4*>4 

X » 






1 nn 




• *TF<IT TKlGTDll^TTnu MTknc Q 


3024 


VX tJtJVC 


1 70P0X 

X ■ VCVtJ 








R3 


, CAUP TP<^T rPD CTATftIC 
1 9nvc 1 C3 1 r 9 1 n 1 


50P5 




1 740t 1 

X * ^VX X 






STD 

J I V 


ACO fRl"i 




S0P6 




OPOPOX 








RP RX 




JVC ■ 




nni 4nx 

WX"tV J 
















104000 






ERROR 






30P9 


VX*^wX^ 


vwc x^ 








Pl^ 
cxw 
















rpppRD 




3031 














• RAO rPP <^TATtlQ 


3032 


013320 


022704 


001136 


11 • 
X * • 


CMP 


ATcri nr R4 




3033 


013324 


001403 








2t 

C 9 




3034 


0133P6 


104000 






ERROR 




«Ait PBROBA TO TBAP TO PMT UPTTnO 


3035 


013330 


000216 






■ Ww»^V 


c Aw 




3036 


013332 


002013 






yORD 


FPPERR 




3037 














«RAn AtiTn.npr 


3038 


013334 


012704 

VAC » 


001176 

W A A * W 




■ IV« 


•TABl R4 


flPnXMT TO PVPFPTPn nATA 


3039 


013340 


004767 


166602 






R7 DATVER 


ivprtty oat a prom PPP 


3040 


013344 


005767 






TST 


COUNT 


• VP Tr rniAdTPRao 




VX003V 












.ODAAJ^U TC f^/W\ O/VMDAOC 
{DHWft^rl x^ uUlAl tU'*'«Ht 












tKHUK 




(ALL EfmuRS TO TRAP TO EnT VECTOR 


3043 


013354 


000217 






UORD 


217 


lUNtQlf ERRflft MLMRFR 












.HUNU 


r WcRH 


lAuDRESS OF CRROR rCSSAGc 


3045 














iPAfl DATA FQflM FPD 


















3047 
















3048 


013S60 














3049 
















3050 
















3051 
















3052 


013360 






T^T4S> 








3053 


013360 


005267 










t TMTDFMPMT TFCT MMIFB 


3054 


013364 


012701 






■■WW 


«m^Wwi«i I •cwWt'^i 


iPflnuT m BFCFTWFn data 1 OTATTniU 


3055 


013370 


012704 


001006 










3056 


013374 


01P70P 

VXC r Vc 


0477^ 




NOW 


r f (TV ff 




3057 


013400 


170 lOP 

X » w X VC 










,1 fwkn FPO CTATiK . nn ni f rn 


3058 


013402 


172464 








/ « nuw 




3059 


013406 


170203 






err DC 




• CAWF TF<IT rpP CTATllC 


3060 


013410 




177600 




^TD 
3 ' W 


ArO ~9AOf Bl 1 




3061 


013414 


WCC • Vw 


047740 




fHP 




lUFQTFV FPP CTATIIC 
i Vw~x* " » » r 3 1 n 1 V3 


3062 


013420 


001403 












3063 


013422 


104 OOO 

* V^ WW 










.All FROnfi^ Tn TRAP TO FHT UFTTHP 


3064 


013424 


000220 








2>PO 




3065 


013426 


002013 






.WORD 


FPPERR 


1 ADDRESS OF ERROR MESSAGE 


3066 














(BAD PPP STATUS 


3067 


013430 


162701 


000200 


1«! 


SUB 


•200. Rl 


jRl-RECOST 


3068 


013434 


062704 


000200 


2«: 


AOO 


•200. R4 


1 POINT TO EXPECTED DATA 


3069 


013440 


004767 


166502 




JSR 


R7,0ATVER 


IVERTIY DATA FROM FPP 


3070 


013444 


005767 


165370 




TST 


COUNT 


iSEE IF COUNTER-0 
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3071 


013450 


001403 






BEQ 


3t 


t BRANCH IF GOOD COHPArtE 


3072 


013452 


104000 






ERROR 




|ALL ERRORS TO TRAP TO EMT VECTOR 


3075 


013454 


000221 






.WORD 


221 


■UNIQUE ERROR NUMBER 


3074 


013456 


002013 






.WORD 


rPPERR 


1 ADDRESS Of ERROR MESSAGE 


S075 














iBAD OATA FROM FPP 


3076 


013460 






3$: 








3077 
















3078 


013460 






MLD0M7: 








3079 
















3060 








l*TEST 44 


TEST LOO MOOE 7 




3061 
















3062 


013460 






TST44: 








3063 


013460 


005267 


165320 




ZNC 


ITESTN 


i INCREMENT TEST NUMBER 


3064 


013464 


012701 


001126 




MOV 


•RECOST.Rl 


i POINT TO RECEIVED OATA LOCATION 


3065 


013470 


005004 






CLR 


R4 


lR4-0 


3066 


013472 


012727 


001176 001136 




MOV 


«TAB1.«TSTL0C 


1 POINTER FOR MOOE 7 GOOD OATA 


3087 


013500 


012702 


047750 




nov 


«47750.R2 


iLOAO GOOD STATUS 


3086 


013504 


170102 






LDFPS 


R2 


iLOAO FPP STATUS • DOUBLE, 10 


3089 


013506 


172474 


001136 




LDD 


8TSTL0C(R4).AC0 


t*TEST INSTRUCTION - MOOE 7 


3090 


013512 


170203 






STFPS 


RS 


iSAVE TEST FPP STATUS 


3091 


013S14 


174011 






STO 


ACO.(Rl) 


(SAVE TEfT RESULT 


3092 


013516 


020203 






CMP 


R2.R3 


iVERIF' »:PP STATUS 


3093 


013520 


001403 






BEQ 


11 


(BRANCH IF GOOD 


3094 


013522 


104000 






ERROR 




(AUL ERRORS TO TRAP TO EMT VECTOR 


3095 


013524 


000222 






.yORO 


222 


t UNIQUE ERROR NUMBER 


3096 


013526 


002013 






.WORD 


rPPERR 


1 ADDRESS OF ERROR MESSAGE 


3097 














iBAO FPP STATUS 


3096 


013530 


005704 




It: 


TST 


R4 


iVERFlY CONTENTS OF R4 


3099 


013532 


001403 






BEQ 


21 


iBRANCH IF GOOD 


3100 


013S34 


104000 






ERROR 




(ALL ERRORS TO TRAP TO EMT VECTOR 


3101 


013536 


000223 






.UORO 


223 


i UNIQUE ERROR NUMBER 


3102 


013540 


002013 






.WORD 


FPPERR 


(ADDRESS OF ERROR MESSAGE 


3103 














(BAD R4 


3104 


013542 


012704 


001176 


21: 


MOV 


*TA81.R4 


(POINT TO RECEIVED DATA 


3105 


013546 


004767 


166374 




JSR 


R7.0ATVER 


(VERFIY DATA FROM FPP 


3106 


013552 


005767 


165262 




TST 


COUNT 


(SEE IF COUNTER -0 


3107 


013556 


001403 






BEQ 


it 


(BRANCH IF GOOD COMPARE 


3106 


013560 


104000 






ERROR 




(ALL ERRORS TO TRAP TO EMT VECTOR 


3109 


013562 


000224 






.UORO 


224 


(UNIQUE ERROR NUMBER 


3110 


013564 


002013 






.UORO 


FPPERR 


(ADDRESS OF ERROR MESSAGE 


3111 














(BAD DATA FROM FPP 


3112 


013566 






31: 








3113 














3114 


013566 






ML0n27t 








3115 
















3116 








••TEST 


45 


TEST LOO MODE 27 


• ONLY 16 BITS ARE LOADED OR STORED 


3117 
















3116 


013566 






TST45: 








3119 


013566 


005267 


165212 




INC 


ITESTN 


(INCREMENT TEST NUMBER 


3120 


013572 


012701 


001126 




MOV 


•RECOST.Rl 


•POINT TO RECEIVED OATA LClATION 


3121 


013576 


012704 


001236 




MOV 


•TA85.R4 


(POINT TO GOOD DATA 


3122 


013602 


012702 


047750 




MOV 


#47750. R2 


(LOAD GOOD STATUS 


3123 


013606 


005005 






CLR 


R5 


•R5-0 


312^ 


013610 


170102 






LOFPS 


R2 


•LOAD FPP STATUS - DOUBLE. ID 


312'^ 


013612 


172427 


043243 




LOO 


•5205. ACO 


••TEST INSTRUCTION - MOOE 27 


31.1;6 


013616 


005205 






INC 


R5 
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5127 


013620 


005205 






INC 


3128 


013622 


005205 






INC 


3129 


013624 


022705 


000003 




CMP 


3130 


013630 


001403 






BEQ 


3131 


013632 


104000 






ERROR 


3132 


013634 


000225 






.UORO 


3133 


013632> 


002013 






.WORD 


3134 












3135 


013(40 


170203 




1(: 


STFP5 


3136 


01S(>42 


174011 






STO 


3137 


013644 


022703 


047740 




CMP 


3138 


013650 


001403 






BEQ 


3139 


013652 


104000 






ERROR 


3140 


013654 


000226 






.UORO 


3141 


013656 


002013 






.UORO 


3142 












3143 


013660 


004767 


166262 


2>; 


JSR 


3144 


015664 


005767 


165150 




TST 


3145 


013670 


001403 






BEQ 


3146 


013672 


104000 






ERROR 


3147 


013674 


000227 






.UORO 


3148 


013676 


002013 






.UORO 


3149 












3150 


013700 






3$: 




3151 












3152 


013700 






HNNRMl 




3153 












3154 








J •TEST 


46 


515S 












3156 


013700 






TST46: 




3157 


013700 


005267 


165100 




INC 


3158 


013704 


012704 


001256 




MOV 


3159 


013710 


005067 


165216 




CLR 


3160 


013714 


005067 


165214 




CLR 


3161 


013720 


012702 


040000 




MOV 


3162 


013724 


170102 






LOFPS 


3163 


013726 


172414 






LOT 


3164 


013730 


1 72014 






WOP 


3165 


013732 


170203 






STFPS 


3166 


013734 


022703 


040004 




CMP 


3167 


013740 


001403 






BEQ 


3168 


013742 


104000 






ERROR 


3169 


013744 


000230 






.UORO 


3170 


013746 


002013 






.UORO 


3171 












3172 


013750 


012701 


001126 


1*: 


MOV 


3173 


013754 


174011 






STF 


3174 


013756 


004767 


166164 




JSR 


3175 


013762 


005767 


165052 




TST 


3176 


013766 


001403 






BEQ 


T1 T7 

1 1 


1 1%) 








cHHOH 


3178 


013772 


000231 






.UORO 


3179 


013774 


002013 






.UORO 


3180 












3181 


013776 


012702 


040200 


2»: 


MOV 


3182 


014002 


170102 






LOFPS 



Lb 

65 

MODE ^7 ONLY 16 BITS ARE LOADED OR STORED 



R5 




R5 


1 TEST PROPER PC PATH 


»3,R5 


1 VERIFY ONLY 3 PC INCREMENT 


11 


1 BRANCH IF PROPER PC ACTION 




lALL ERRORS TO TRAP TO EMT VECTOR 


225 


1 UNIQUE ERROR NUMBER 


FPPERR 


1 ADDRESS OF ERROR MESSAGE 




iBAD MODE 27 LOAD 


R3 


iSAVE TEST FPP STATUS 


ACO.(Rl) 


iSAVE TEST RESULT 


♦47740, R3 


1 VERIFY FPP STATUS 


2t 


t BRANCH IF GOOD 




lALL ERRORS TO TRAP TO EMT VECTOR 


226 


1 UNIQUE ERROR NUMBER 


FPPERR 


t ADDRESS OF ERROR MESSAGE 




»BAO FPP STATUS 


R7 .OATVER 


iVERFlY DATA FROM FPP 


COvN 1 




3* 


{BRANCH IF GOOD COMPARE 




lALL ERRORS TO TRAP TO EMT VECTOR 


227 


i UNIQUE ERROR NUMBER 


FPPERR 


lAOORESS OF ERROR MESSAGE 




iBAO DATA FROM FPP 



TEST ADOF. AOOO. SUBF. SUBO - ACO-O FSRC-Oj 



ITESTN 

#TA86.R4 

REC0ST*4 

REC0ST.6 

M0000.R2 

R2 

(R4).AC0 
CR4).AC0 
R3 

•40004, R3 
II 

2S0 
FPPERR 

•RECDST.Rl 
ACO.CRl) 
R7. OATVER 
COUNT 
21 

231 

FPPERR 

♦40200.R2 
R2 



I 6 AO FPP 



INCREMENT TEST NUMBER 
POINT TO FSRC TEST DATA 
CLEAR OUT RECEIVED DATA TABLE 

SET UP GOOD STATUS 

LOAD FPP STATUS. FLOATING 

LOAD ACO UITH 0 

0*0 

SAVE STATUS 
VERIFY STATUS 
BRANCH IF GOOD 

ALL ERRORS TO TRAP TO EMT VECTOR 
UNIQUE ERROR NUMBER 
ADDRESS OF ERROR MESSAGE 
STATUS 

POINT TO RECEIVERD DATA 
SAVE DATA 
VERIFY DATA 



I BRANCH IF GOOD 

(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 
I BAD DATA IN ACO 

[LOAD FLOATING STATUS 



GLOCA^ MREMS HACYll 50A(1052) 
KOJnA.MAC 15-MAR 84 15:51 



15 MAR 84 
T46 



M5 

16:58 PAGE 64 

TEST ADDF. ADDD. SUSP. SUBD 



5183 
3184 
3185 
3186 
3187 
3188 
3189 
3190 
3191 
3192 
3193 
3194 
3195 
3196 
3197 
3198 
3199 
3200 
3201 
3202 
3203 
3204 
3205 
3206 
3207 
3208 
3209 
3210 
3211 
3212 
3213 
3214 
3215 
3216 
3217 
3218 
3219 
3220 
3221 
3222 
3223 
3224 
3225 
3226 
3227 
3228 
3229 
3230 
3231 
3232 
3233 
3234 
3235 
3236 
3237 
3238 



014004 
014006 
014010 
014012 
014014 
014020 
014022 
014024 
014026 

014030 
014034 
014040 
014042 
014044 
014046 

014050 
014052 
014054 
014056 
014062 
014064 
014066 
014070 

014072 
014074 
014100 
014104 
014106 
014110 
014112 

014114 
014120 
014122 
014124 
014126 
014130 
014134 
014136 
014140 
014142 

014144 
014150 
014154 
014156 
014160 
014162 

014164 



014164 



172414 
172014 
174011 
170203 
022703 
001403 
104000 
000232 
002013 

004767 
005737 
001403 
104000 
000233 
002013 

172414 
173014 
170203 
022703 
001403 
104000 
000234 
002013 

174011 
004767 
005767 
001403 
104000 
000235 
002013 

170127 
172414 
173014 
170203 
174011 
022703 
001403 
104000 
0002S6 
002015 

004767 
005767 
001403 
104000 
000237 
002013 



040204 



166112 
001040 



3$: 



44ti 



040204 



166046 
164734 



000000 



000004 



165776 
164664 



4t! 



5t: 



6«: 



LDD 

ADDD 

STO 

STFPS 

CMP 

BEQ 

ERROR 

.WORD 

.WORD 

JSR 

TST 

BEQ 

ERROR 

.WORD 

.UORD 

LOD 

SUBD 

STFPS 

CMP 

BEQ 

ERROR 

.UORJ 

.worn) 

STO 

JSR 

TST 

BEQ 

ERROR 

.WORD 

.WORD 

LDFPS 
LOO 

sueF 
srrps 

STD 

CMP 

BEQ 

ERROn 

.WORD 

.UORO 



(R4).AC0 
{R4).AC0 
ACO.(Rl) 
R3 

«40204.R3 
3« 

232 

FPPERR 

R7.DATVER 

8«C0UNT 

44$ 

233 

FPPERR 

(R4).AC0 
(R4).AC0 
R3 

«40204,R3 
4t 

234 

FPPERR 

ACO.(Rl) 
R7.DATVER 
COUNT 
St 

235 

FPPERR 
*0 

(R4).AC0 
(R4).AC0 
R3 

ACO.CRl) 

•4,R3 

6t 

236 
FPPERR 

R7.0ATVER 



JSR 

TST COUNT 
BEQ 7t 
ERROR 

.UORO 257 
.WORD FPPERR 



I BAD FPS 



ACO-0 FSRC-0, 

I LOAD ACO WITH 0 
i*TEST INSTRUCTION 
(SAVE DATA 
;SAVE FPS 
iVERFIY STATUS 
I BRANCH IF GOOD 

,ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
{ADDRESS OF ERROR MESSAGE 



SECl O064 



I BAD ACO 



jVERFIY DATA 
I VERIFY RESULT 
J BRANCH IF GOOD 

.ALL ERRORS TO TRAP TO EMT VECTOR 
{UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 

) 

{SETUP DATA 
j*TEST INSTRUCTION 
(SAVE STATUS 

(VERFIY STATUS 
(BRANCH IF GOOD 

{ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 



7$; 



(BAD FPS 

(SAVE ACO DATA 

{VERFIY DATA 

IbRANCH if GOOD 

(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 

(BAD ACO 

(STORE FPP STATUS 
(LOAD ACO 

(0-0 

(SAVE STATUS 
{SAVE ACO 
s VERFIY STATUS 
(BRANCH IF GOOD 

(ALL ERRORS TO TRAP TO EMT VECTOR 

(UNIQUE ERROR NUMBER 

I ADDRESS OF ERROR MESSAGE 

(BAD FPS 

(VERIFY DATAT 

(BRANC IF GOOD 

(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 

(BAD ACO 



MNNRM?: 



GLOBAL AREAS MACYll S0A(1052) 
KDJllA.MAC 15 -MAR 84 15:51 

3239 
3240 
3241 



3242 


014164 






3243 


014164 


005267 


164614 


3244 


014170 


012701 


001126 


3245 


014174 


012705 


001256 


3246 


014200 


012704 


001206 


3247 


014204 


170127 


000200 


3248 


014210 


172415 




3249 


014212 


005002 




3250 


014214 


170102 




3251 


014216 


172414 




3252 


014220 


172015 




3253 


014222 


170203 




3254 


014224 


174011 




3255 


014226 


022703 


000000 


3256 


014232 


001403 




3257 


014234 


104000 




3258 


014236 


000240 




3259 


014240 


002013 




3260 








3261 


014242 


012704 


001226 


3262 


014246 


004767 


165674 


3263 


014252 


005767 


164562 


3264 


014256 


001403 




3265 


014260 


104000 




3266 


014262 


000241 




3267 


014264 


002013 




3268 








3269 


014266 


170127 


000200 


3270 


014272 


172414 




3271 


014274 


173015 




3272 


014276 


170203 




3273 


014300 


174011 




3274 


014302 


022703 


000200 


3275 


014306 


001403 




3276 


014310 


104000 




3277 


014312 


000242 




3278 


014314 


002013 




3279 








3280 


014316 


012704 


001226 


3281 


014322 


004767 


165620 


3282 


014326 


005767 


164506 


3283 


014332 


001403 




3284 


014334 


104000 




3285 


014336 


000243 




3286 


014340 


002013 




3287 








3288 


014342 







3289 
3290 

3291 014342 

3292 

3293 

3294 



N5 



5 MAR -64 
T47 



16: 



PAGE 6! 
ST aBOF.? 



iUBO rSRC-0. ACO NE 0 



SEQ 0065 



TST47: 



II; 



2t; 



St: 



17 


TE^T ADDF SUBD 


- FSRC 


-0. ACO NE 0 




INC 


f TESTN 




iINCREMENl TEST NUMBER 




MOV 


MECDST Rl 




1 POINT TO RECEIVED DATA TABLE 


MOV 


0TAB6.R5 




1 POINT TO SOURCE DATA TABLE 




MOV 


0TAB2 . R4 




tPOINT TO ACO DATA 




LQFPS 


^200 




iSET TO DOUBLE FOR CLEAR 




LOO 


(R5).AC0 








CLR 


R2 




1 SETUP FPP STATUS 




LQFPS 


R2 




iLOAO FPS 




LOF 


CR4}.AC0 




iLOAO ACO 




ADQF 


CR5).AC0 




t«TEST INSTRUCTION 




STFPS 


R3 




iSAVE STATUS 




STF 


ACO. CRD 




iSAVE ACO 




CUP 


•O.RS 




IVERFIY NEGATIVE RESULT 




BEQ 


11 




{BRANCH IF GOOD 




ERROR 






lALL ERRORS TO TRAP TO EMT 


VECTOR 


.WORD 


240 




{UNIQUE ERROR NUMBER 




.WORD 


FPPERR 




1 ADDRESS OF ERROR MESSAGE 








iBAO FPS 




MOV 


♦TAB4.R4 




iPOINT TO EXPECTED DATA 




JSR 


R7.0ATVER 




iVERTlY ACO 




TST 


COUNT 




t CHECK RESULT 




BEQ 


21 




{BRANCH IF GOOD 




ERROR 






(ALL ERRORS TO TRAP TO EMT 


VECTOR 


.WORD 


241 




(UNIQUE ERROR NUMBER 




.WORD 


FPPERR 




t ADDRESS OF ERROR MESSAGE 








iBAD 


ACO 




LOFPS 


#200 


iSET 


STATUS TO OUOBLE NODE 




LOO 


CR4).AC0 




(LOAD ACO WITH A VALUE 




SUBD 


(R5).AC0 




(*TEST INSTRUCTION 




STFPS 


R3 




(SAVE FPP STATUS 




STO 


ACO.(Rl) 




(SAVE ACO 




cnp 


•200. R3 


1 VERIFY RESULT 




BEQ 


5> 




(BRANCH IF GOOD 




ERROR 






(ALL ERRORS TO TRAP "0 EMT 


VECTOR 


.VIQRO 


242 




(UNIQUE ERROR NUMBER 




.WORD 


FPI%RR 




(ADDRESS OF ERROR MESSAGE 








iBAO 


SUBD 




MOV 


#TAB4.R4 




(POINT TO EXPECTED 




JSR 


R7,DATVE9 




(VERIFY ACO 




TST 


COUNT 








BEQ 


41 




! BRANCH IF GOOD ACO 




ERROR 






(ALL ERRORS TO TRAP TO EMT 


VECTOR 


.WORD 


243 




(UNIQUE ERROR NUMBER 




.UORO 


FPPERR 




(ADDRESS OF ERROR MESSAGE 








tBAO 


ACO 





4t: 



MNNRM3: 
I i TEST 50 



TEST AODD, SUBF FSRC NE 0. ACO-0 



GLOBAL AREAS MACUl 50A(1052) IS MAR 84 16:56 
KDJllA.MAC 15 MAR 04 15:51 T50 ^est 



5^95 


01434^ 






TST50; 




3296 


014342 


005267 


164456 




INC 




014346 


012701 


001126 




MOV 


3290 


014352 


012705 


001256 




HOV 


3299 


014356 


012704 


001176 




nov 


3300 


014362 


012702 


000200 




HOV 


3301 


014366 


170102 






Lorps 


3502 


014370 


172415 






LOO 


3303 


014372 


172014 






ADDO 


3304 


014374 


1 70203 






STFPS 


3305 


014376 


174011 






STO 


3306 


014400 


022703 


000210 




CMP 


3307 


014404 


001405 






BEQ 


3506 


014406 


104000 






ERROR 


3309 


014410 


000244 






.WORD 


3310 


014412 


002015 






.WORD 


3511 












3512 


014414 


004767 


165526 


It: 


JSR 


5515 


014420 


005767 


164414 




TST 


5514 


014424 


001405 






BEQ 


5315 


014426 


104000 






ERROR 


5516 


0144)0 


000245 






.WORD 


5517 


014452 


002015 






.UORO 


5518 












5519 


014454 


170127 


000200 


21: 


LOTPS 


5520 


014440 


172415 






LOT 


5521 


014442 


175014 






SUBO 


5522 


014444 


170205 






STFPS 


5523 


014446 


174011 






STF 


5524 


014450 


022705 


000200 




DIP 


5525 


014454 


001405 






BEQ 


5526 


014456 


104000 






ERROR 


5527 


014460 


000246 






.UORO 


5528 


014462 


002015 






.UGRO 


3329 












5550 


014464 


012704 


001446 


St: 


nov 


5551 


014470 


004767 


165452 




JSR 


5552 


014474 


C05767 


164540 




TST 


5555 


014500 


001405 






BEQ 


5554 


014502 


104000 






ERROR 


3555 


014504 


000247 






.UORO 


5556 


014506 


002013 






.UORD 


5557 












5558 


014510 






4t: 




5559 












5540 












5541 


014510 






mwm 




3542 












3543 








l*TCST 


51 


3344 










3345 


014510 






TST51t 




5546 


014510 


005267 


164270 




X*C 


5547 


014514 


012702 


005240 




HOV 


5548 


014520 


170102 






LOFPS 


3349 


014522 


012704 


001276 




MOV 


5550 


014526 


012705 


001506 




MOV 



E 66 
OD. SUBF 



FSRC NE 0. ACO'O 



SEQ 0066 



ITESTN 

♦RECDST.Rl 

•TAe6.R5 

•TAB1.R4 

•200. R2 

R2 

(R5).AC0 
(R4).AC0 
95 

'':0.{RI) 
•210, R5 
It 

244 

FPPERR 

R7.0ATVER 

COUNT 

2t 

245 
rPPERR 

•200 

(R5).«C0 
(R4).AC0 
R5 

RCO.(Rl) 

•200.RS 

St 

rPPERR 

•TA81B.R4 

R7.0ATVCR 

COUNT 

«t 

<«7 
rRPCRR 



I INCREMENT TEST NUMBER 

•POINT TO RECEIVED DATA TABLE 

iPOINT TO ACO DATA TABLE 

I POINT TO FSRC DATA 

I SETUP FPP STATUS 

I LOAD FPS 

I LOAD ACO 

••TEST INSTRUCTION 
I SAVE STATUS 
I SAVE ACO 

IVERFIY NEGATIVE RESULT 
(BRANCH IF GOOD 

I ALL ERRORS TO TRAP TO EMT VECTOR 

t UNIQUE ERROR NUMBER 

I ADDRESS OF ERROR MESSAGE 

iBAO FPS 

iVERFlY ACO 
iCHECK RESULT 
•BRANCH IF GOOD 

I ALL ERRORS TO TRAP TO EMT VECTOR 
I UNIQUE ERROR NUMBER 
lAOORESS OF ERROR MESSAGE 

I BAD ACO 

•SET STATUS TO DUQBLE NODE 

ILOAO ACO UITH A VALUE 
l*TEST INSTRUCTION 
tSAVC FPP STRTU5 
a SAVE ACO 

iVERIFv RESULT 

iBRANCM IF GOOD 

lALL ERRORS TO TRAP TO EMT VECTOR 
lUNIOUE ERROR NU(«ER 
lAOORCSS or ERROR »CSSAGE 
iBAO SUBD 

iPOINT TO EXPECTED DATA 
I VERITY MCO 

iaRANCH If GOOD ACO 

•ALL ERRORS TO TRAP TO EMT VECTOR 

lUHIQUE ERROR l«f«ER 

lHOORESS OF ERROR MESSAGE 

iBAO ACO 



TEST AOOr, SUM) • EXP(ACO) " EXP(FSRC) 



tTESTN 
•5240. R2 

R2 

•TAB7,R4 
•TAB6,R5 



I INCREMENT TEST NJMBER 
iSET FlU.FO.FT 

•SET FSRC 
I SETUP ACO 



5551 014552 012701 001126 MOV 

5352 014536 172415 LOO 

5355 014540 172014 AOOO 

3354 014542 174011 STO 

5355 014544 012704 001516 HOV 

3356 014550 004767 165372 JSR 

3357 014554 OOS767 164260 TST 

3358 014560 001403 BEQ 

3359 014562 104000 ERROR 

3360 014S64 000250 .UQRD 

3361 014566 002013 .UORO 
3362 

3363 014570 012704 001306 11: MOV 

3364 014574 012703 001306 MOV 

3365 014600 012702 003200 MQV 

3366 014604 170102 LOFPS 

3367 014606 172413 LOO 

3368 014610 061400 ADD 

3369 014612 174011 STD 

3370 014614 004767 165326 JSR 

3371 014620 005767 164214 TST 

3372 014624 001403 BEQ 

3373 014626 104000 EfWOft 

3374 014630 000251 .UORO 

3375 014632 002013 .WORO 
3376 

3377 014634 21: 

3378 

3379 

3380 014634 HXOTlt 
3381 

3382 l*TEST 52 

3383 lt********«*»< 

3384 014634 TSTSS: 
5385 014634 005267 164144 INC 
3386 014640 012702 003200 HOV 

5387 014644 170102 LOFPS 

5388 014646 012704 001336 MOV 
3389 014652 012701 001126 MOV 
3590 014656 012705 001326 MOV 

3391 014662 172415 tOO 

3392 014664 172014 AOOO 

3393 014666 170203 STfPS 

3394 014670 174011 STO 

3395 014672 022703 003200 CMP 

3396 014676 001403 BEQ 

3397 014700 104000 ERROR 

3398 014702 000252 .UORO 

3399 014704 002015 .UORO 
3400 

3401 014706 0*2704 001546 It: MQV 

3402 014712 004767 165250 JSR 

3403 014716 005767 164116 TST 

3404 014722 001403 BEQ 

3405 014724 1040O0 ERROR 

3406 014726 000253 .UORO 



SUBU EXP(ACO) • EXP(FSRC) 



SEQ 0067 



*REC0ST,R1 

(R5),AC0 

(R4).AC0 

ACO.(Rl) 

«TAB9.R4 

R7,DATVER 

COUNT 

II 

250 
FPPERR 

«TAB8.R4 
•TAB6.RS 

•5200. R2 
R2 

(R5).AC0 

(R4}.AC0 

ACO.(Rl) 

R7,0ATVER 

COUNT 

2* 

251 

rpPERR 



, POINT TO RECEIVED DATA 
I LOAD ACO 

l*TEST INSTRUCTION 
I SAVE TEST RESULT 
iPOINT TO EXPECTED DATA 
I VERIFY ACO DATA 

! BRANCH IF GOOD 

I ALL ERRORS TO TRAP TO EMT VECTOR 
{UNIQUE ERROR NUMBER 
I ADDRESS OF ERROR MESSAGE 
I BAD AOOO 

! SETUP SAME ACO 
iROUNO MODE 

I LOAD ACO 

I* TEST INSTRUCTION 
I SAVE DATA 
I VERIFY ACO 

I BRANCH IF GOOD 

I ALL ERRORS TO TRAP TO EMT VECTOR 
t UNIQUE ERROR NUMBER 
I ADDRESS OF ERROR MESSAGE 
iBAO ROUM) RESULT 



TEST ROD . EXP(FSRC) .GT. EXPCRCO) 



•TESTN 
•5200 »R2 
R2 

•TA811.R4 

•RE COST. Rl 

•TAB10.R5 

(R5).AC0 

CR4).AC0 

RS 

ACO.(Rl) 
•S20O.R5 
II 

252 
FPPERR 

•TAB11A.R4 
R7.0ArvER 
COUNT 
21 

255 



I INCREMENT TEST MMKR 
lR2«FPP STATUS 
ILOAO FPS STATUS 
I POINT TO FSRC DATA 
I POINT TO ACO RESULT 
iPOINT TO ACO DATA 
iLONO ACO DATA 
t*TEST INSTRUCTIONS 
J SAVE FPP STATUS 
I SAVE ACO DATA 
t VERIFY FPP STATUS 
iBRANCH IF GOOD 

tALL ERRORS TO TRAP TO EMT VECTOR 
•UNIQUE ERROR NUMBER 
I ADDRESS OF ERROR MESSAGE 
iBAO FPP STATUS 

iPOINT TO EXPECTED DATA 
iVERIFt CONTENTS OF ACO 

IbRANCH IF GOOD ACO 

I ALL ERRORS TO TRAP TO EMT VECTOR 

I UNIQUE ERROR NL««ER 



bLOBAt. ARfAS MACtll 50A(105^) 
KOJllA.riAC 15 HAR 84 15:51 



5407 


014730 


002015 




3400 








5409 


014752 


012704 


001556 


5410 


014756 


172415 




5411 


014740 


172014 




5412 


014742 


012704 


001576 


5415 


014746 


174011 




5414 


014750 


004767 


165172 


5415 


014754 


005767 


164060 


5416 


014760 


001405 




5417 


014762 


104000 




5418 


014764 


000254 




5419 


014766 


002015 




5420 








5421 


014770 


012702 


005000 


5422 


014 774 


012704 


001406 


5425 


015000 


012705 


001416 


5424 


015004 


172415 




5425 


015006 


170102 




5426 


015010 


172014 




5427 


015012 


170127 


000200 


5428 


015016 


174011 




5429 


015020 


012704 


001526 


5450 


015024 


004767 


165116 


5451 


015050 


005767 


164004 


3452 


015054 


001405 




5453 


015056 


104000 




5454 


015040 


000255 




5435 


015042 


002015 




3456 








5457 


015044 


012705 


001426 


5438 


015050 


170102 




3459 


015052 


172415 




5440 


015054 


172014 




3441 


015056 


174011 




3442 


015060 


012704 


001456 


5443 


015064 


004767 


165056 


5444 


015070 


005767 


165744 


5445 


015074 


001405 




5446 


015076 


104000 




5447 


015100 


000256 




5448 


015102 


002015 




3449 








3450 


015104 






3451 








3452 








3453 








3454 


015104 






5455 








5456 








5457 








5458 


015104 






5459 


015104 


005267 


165674 


3460 


015110 


012702 


003200 


5461 


015114 


170102 




3462 


015116 


012704 


001456 



Db 



2»: 



51: 



41; 



^fsT^SBS ^«EXP(FSRC 


. WUHD 


r HPtHR 


nuv 


A TAB 4 O OA 


LDD 




WOO 




nuv 




3 1 u 


APA roi ^ 




D7 OATWCD 
N r 1 UM 1 VCH 


TST 


COUNT 


BEQ 


5< 


tKHUK 




. WUriU 




. WUNU 


r DOC DO 


nuv 




nuv 


ATA01A DA 


nuv 


V 1 nDl3 • n3 


1 nn 

LUU 


f o^ ^ Arn 

^ H3 i , nV>U 


1 nrDc 

LUr Ks 


D3 


Anne 


f OA '^ Am 


1 nroc 




CTn 


Am foi ^ 


Mnu 
nuv 


ATADin DA 




a 7 nDTwro 

If r » UM 1 VCn 


TST 


COUNT 


BEQ 


4< 


cBono 

CnlfUM 




unDn 






rOOBDO 
rntfOf 


nuv 


ATA01& OK 


1 nroc 


OS 


1 nr 

LUr 


/Dit% A/'n 


Annr 


/DA^ Am 


CTn 
alU 


ACA TBI ) 


Mnw 
nuv 


AT AD IT DA 


ICD 


D7 nATUfTD 


TST 


COUNT 


BEQ 


St 


ERROR 




.WORD 


256 


.UORO 


rpPERR 



SEQ 0068 



Sli 



i ADDRESS OF ERROR MESSAGE 
I BAD ACO, SHOULD • FSRC 

t POINT TO rSRC DATA 
(AGO 

.♦TEST INSTRUCTION 
iPOINT TO EXPECTED RESULT 
I SAVE AGO DATA INTO RECDAT 
I VERIFY DATA 

I BRANCH IF GOOD DATA 
I ALL ERRORS TO TRAP TO EHT VECTOR 
I UNIQUE ERROR NUMBER 
I ADDRESS OF ERROR MESSAGE 
I BAD ACO DATA 

iGET FPP STATUS DATA 
iPOINT TO FSRC DATA 
iPOINT TO ACO DATA 
iLOAO ACO 

iFPP STATUS • FLOAT. INTERR«JPTS ENABLE 

{•TEST INSTRUCTION 

iRESET TO DOUBLE 

iRECDST-ACO 

t POINT TO GOOD DATA 

tVERFlY CONTENTS OF AGO 

iBRANCH IF GOOD 

I ALL ERRORS TO TRAP TO EHT VECTOR 
•UNIQUE ERROR NUMBER 
I ADDRESS OF ERROR MESSAGE 
iBAO FLOATING AOO 

iPOINT TO ACO DATA 
iFPR STATUS • FLOAT 
I LOAD ACO 

{•TEST INSTRUCTION 

(SAVE ACO DATA 
I POINT TO GOOD DATA 



iBRANCM IF GOOD 

{ALL ERRORS TO TRAP TO EMT VECTOR 
•UNIQUE ERROR NUMBER 
lAOORESS OF ERROR rCSSAGE 
iBAO FLOATING AOO 



MNCOP: 

!*TEST*55 * TEST AOOO WITH NEGATIVE OPERANDS 

TST53J 

INC ITESTN I INCREMENT TEST NUMBER 

MOV •S200.R2 iLOAD FPS VALUE 

LOFPS R2 I 

NOV tTAeaLRA lOATA ADDRESS FQR ACO AND FSR 



t 6 



GLOBAL AREAS 
KOJllA.MAC 



MACYll 50A(1052) 
15-MAR 84 15:51 



IS MAR 04 

T55 



16:58 PACE 69 

TEST AOOO WITH NEGATIVE OPERANDS 



SEQ 0069 



3465 
3464 
5465 
3466 
3467 
3468 
3469 
3470 
3471 
3472 
3473 
3474 
3475 
3476 
3477 
3478 
3479 
3480 
3481 
3462 
3483 
5404 

3465 
3466 
3467 
3468 
3469 
3490 
3491 
3492 
3493 
3494 
3495 
3496 
3497 
3498 
•>»99 
3500 
3501 
3502 
3503 
3504 
3505 
3506 
3507 
3508 
3509 
3510 
3511 
3512 
3513 
3514 
5515 
3516 
3517 
3518 



015122 
015124 
015126 
015130 
015134 
015136 
015142 
015144 
015146 
015150 

015152 
015156 
015162 
015166 
015170 
015172 
015174 



015176 
015202 
015206 
015214 
015216 
015220 
015222 
015224 
015226 

015230 
015232 
015236 
015240 
015244 
015246 
015250 
015252 

015254 
015256 
015262 
015264 
015266 
015270 

015272 
015274 
015300 
015304 
015310 
015312 
015314 
015316 



172414 
1 72014 
170203 
012701 
174011 
022703 
001403 
104000 
000257 
002013 

012704 
004767 
005767 
001403 
104000 
000260 
002013 



012704 
012701 
012737 
172411 
172014 
170000 
104000 
000261 
002013 

170203 
012701 
174011 
022703 
001403 
104000 
000262 
002013 

012605 
020527 
001403 
104000 
000263 
002013 

005726 
012704 
004 767 
005767 
001403 
104000 
000264 
002013 



001126 
003210 



001466 
164764 

163652 



It: 



001456 
001476 

015230 000244 



001126 
103200 



21: 



I00«: 



1011: 



015220 



St: 



001506 
164642 
163530 



1021; 



LOO 

AOOO 

STFPS 

MOV 

STQ 

CMP 

BEQ 

ERROR 

.UORD 

.UORO 

MOV 

JSR 

TST 

BEQ 

ERROR 

.UORO 

.UORO 

( 

MOV 

MOV 

MOV 

LOO 

AOOO 

CFCC 

ERROR 

.UORO 

.UORO 

STFPS 

MOV 

STO 

CMP 

BEQ 

EfiHOft 

.UORO 

.uORD 

MOV 

CMP 

BEQ 

ERROR 
.UORO 
.UORO 

TST 

MOV 

JSR 

TST 

BEQ 

ERROR 

.UORO 

.UORO 



(R4).AC0 
(R4),AC0 
R3 

«REC0ST,R1 
ACO.(Rl) 
•3210. R3 
II 

257 

FPPERR 

•TAB22.R4 
R7.0ATVER 
COUNT 
21 

260 

FPPERR 



!ACO! 



I-FSRC! • 
•TAB21.R4 
♦TAB23.R1 
•101t.8«rPVEC 
(Rl).ACO 
(R4).AC0 



261 

FPPERR 
RS 

•RECOST.Rl 
ACO.tRH 
•10S200.R3 
S« 

262 

FPPERR 

(SP)».R5 
R5.«100« 
1021 

265 
FPPERR 

(SP)» 
♦TAB24.R4 

R7.0ATVER 

COUNT 

4t 

264 

FPPERR 

J-ACOl • SFSRC! 



I ACO- 100200 0 0 0 
I •TEST INSTRUCTION 
I SAVE STATUS 

J POINT TO RECEIVED DATA TABLE 
I SAVE ACO DATA 
iVERIFY STATUS 
I BRANCH IF GOOD 

I ALL ERRORS TO TRAP TO EMT VECTOR 
I UNIQUE ERROR NUMBER 
lAOORESS OF ERROR MESSAGE 

jPOINT TO EXPECTED DATA 

I VERIFY DATA 
(BRANCH IF GOOD 

I ALL ERRORS TO TRAP TO EMT VECTOR 

i UNIQUE ERROR NUMBER 

i ADDRESS OF ERROR MESSAGE 



(POINT TO FSRC DATA 
(POINT TO ACO DATA 
(SETUP FP VECTOR 
I LOAD ACO 

(*TEST INSTRUCTION 
(COPY FPP CC 

(ALL ERRORS TO TRAP TO EMT VECTOR 
I UNIQUE ERROR NUMBER 
I ADDRESS OF ERROR MESSAGE 
(GO TO ERROR 

(SAVE FPP STATUS 

iPOINT TO RECEIVED DATA TABLE 
iSAVE ACO DATA 
(VERIFY STATUS 
1 BRANCH IF GOOD 

(ALL ERRORS TO TRAP TO EMT VECTOR 
I UNIQUE ERROR NUr«ER 
I ADDRESS OF ERROR MESSAGE 
(BAD STATUS 

•GET ERROR PC 

i VERIFY ERROR ADDRESS ON STACK 
iBRANCH IF GOOD 

lALL ERRORS TO TRAP TO EMT VECTOR 
lUNIQUE ERROR NUMBER 
lAOORESS OF ERROR MESSAGE 
iBAO ERROR RETURN ON STACK 
(RESTORE STACK 

(POINT TO EXPECTED DATA TABLE 
(VERIFY DATA 

iBRANC IF GOOD 

(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 
(BAD ACO DATA 



GLOeAt. ARtAS MAC III 50A{1052) 15 MAR 84 
KOJllA.MAC 15 MAR-e4 15:51 T53 



5519 

3520 

5521 

5522 

5525 

5524 

3525 

5526 

5527 

5528 

5529 

5550 

3531 

3552 

5533 

3534 

3535 

3536 

3537 

3538 

3559 

5540 

3541 

3542 

3543 

3544 

3545 

3546 

3547 

3548 

5549 

5550 

5551 

5552 

3555 

5554 

5555 

5556 

3557 

3558 

3559 

5560 

5561 

5562 

5565 

3564 

3565 

5566 

3567 

3568 

5569 

5570 

5571 

5572 

3573 

5574 



015520 
015524 
015550 
015556 
015542 
015544 
015546 
015550 
015552 
015354 
015556 

015360 
015562 
015366 
015370 
015374 
015376 
015400 
015402 

015404 
015406 
01S412 
015414 
015416 
015420 

015422 
015424 
015430 
015434 
015440 
015442 
015444 
015446 



015450 
015454 
015460 
015464 
015466 
015474 
015476 
015500 
015502 
01S506 
015510 
015514 
015516 
015520 
015522 

015524 

015530 



012704 
012701 
012757 
012702 
170102 
172411 
172014 
170000 
104000 
000265 
002013 

170203 
012701 
174011 
022703 
001403 
104000 
000266 
002013 

012605 
020527 
001403 
104000 
000267 
002013 

005726 
012704 
004767 
005767 
001403 
104000 
000270 
002013 



012704 
012701 
012702 
170102 
012737 
172411 
172014 
170203 
012701 
174011 
020327 
001405 
104000 
000271 
002015 

012704 
004767 



001476 
001456 

015560 000244 
005200 



4»i 



001126 
103200 



103» 



104* 



015550 



5»: 



001506 
164S12 
163400 



105t 



001526 
001516 
003200 

000246 000244 



001126 
003200 



6<: 



001536 
164412 



7fi 



58 PAGE 70 

" iT Aor 



TES1 



00 WITH NEGATIVE OPERANDS 



SEQ 0070 



MOV 

MOV 

MOV 

MOV 

LDFPS 

LDD 

ADOD 

CFCC 

ERROA 

.UORD 

.WORD 

STFPS 

MOV 

STO 

CMP 

BEQ 

ERROR 

.UORO 

.UORO 

MOV 

CMP 

BEQ 

ERROR 

.yORO 

.UORO 

TST 

HOV 

JSR 

TST 

BEQ 

ERROR 

.UORO 

.UORO 

MOV 

nov 

HOV 
LOFPS 

nov 

LOO 

AOOO 

STFPS 

flOV 

STO 

cm 

BEQ 
ERROR 
.UORO 
.UORO 

MOV 

JSR 



«TAB2^.R4 

•TAB21.R1 

•104».Q*FPVEC 

«3200.R2 

R2 

(Rl).ACO 
(R4).AC0 



265 
rpPERR 

R5 

«RECDST.R1 
ACO.(Rl) 
•105200. R5 
SI 

266 

FPPERR 

(SP)»,R5 
RS.«10SI 
lOSI 

267 

FPPERR 

(SP)* 

•TAB24.R4 

R7.0ATVER 

COUNT 

69 

270 
FPPERR 

!-FSRC! « 

•TIMI26,R4 

•TAB2S.RI 

*S200,R2 

R2 

»2««.B«FPVEC 

(RD.ACO 
(R4).AC0 
RS 

•RECOST.Rl 
ACO.CRl) 
RS.«3200 
It 

271 

FPPERR 

•TAB37.R4 
R7,0ATVER 



iPOINT TO FSRC DATA 
iPOINT TO ACO DATA 
I SETUP rp VECTOR 
I LOAD FPS VALUE 
i 

iLOAO ACO DATA 

I •TEST INSTRUCTION 

jCOPY rpp CC 

I ALL ERRORS TO TRAP TO EMT VECTOR 
lUNIOUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 
iGO TO ERROR 

I SAVE FPS 
tSAVE ACO 

jvERFIr STATUS 
{BRANCH IF GOOD 

tALL ERRORS TO TRAP TO EMT VECTOR 
I UNIQUE ERROR NUNBER 
lAOORESS OF ERROR MESSAGE 
iBAO FPS STATUS 

iGET ERROR PC 

I VERIFY ERROR AOORESS ON STACK 
iBRANCM IF GOOO 

I ALL ERRORS TO TRAP TO EMT VECTOR 
I UNIQUE ERROR NUMBER 
lAOORESS OF ERROR MESSAGE 
tBAO ERROR RETURN ON STACK 
•RESTORE STACK 
iPOINT TO EXPECTEO DATA 



iBRANCH IF GOOD 

lALL ERRORS TO TRAP TO EMT VECTOR 
t UNIQUE ERROR NltSER 
iM)ORESS OF ERROR MESSAGE 



iBAO ACO 
!ACO! 



tBAO FPS 



iPOINT TO FSRC DATA 
I POINT TO ACO DATA 
tLOAO FPS VALUE 

! SETUP FP VECTOR 
I LOAD ACO DATA 
l*TEST INSTRUCTION 
I SAVE STATUS 

iPOINT TO RECEIVED DATA TABLE 

I SAVE ACO 

I VERIFY STATUS 
iBRANCH IF GOOD 

I ALL ERRORS TO TRAP TO EMT VECTOR 
t UNIQUE ERROR NUMBER 
lAOORESS OF ERROR MESSAGE 

iPOINT TO EXPECTEO OSATA 
I VERIFY OAT A 



GLOBAL ARFAS MACvll 30A(1052) 15 MAR 84 16:58 PA 

KOJllA.MAC 15-MAR-84 15:51 T53 TEST A 

5575 0155S4 005767 163300 TST 

3576 015540 001403 BEQ 

3577 015542 104000 ERROR 

3578 015544 000272 .UORO 

3579 015546 00201S .WORD 
3580 

3581 I 

3582 015550 012704 001516 81: MOV 

3583 015554 012701 001526 MOV 

3584 01SS60 172411 LOO 

3585 015562 172014 ADDD 

3586 015564 170203 STFPS 
5587 015566 012701 001126 MOV 

3588 015572 174011 STO 

3589 015574 020327 003200 CMP 

3590 015600 001403 BEQ 

3591 015602 104000 ERROR 

3592 015604 000273 .WORD 

3593 015606 002013 .WORD 
3594 

3595 015610 012704 001536 9t: MOV 

3596 015614 004767 164326 JSR 

3597 015620 005767 163214 TST 

3598 015624 001403 BEQ 

3599 015626 104000 ERROR 

3600 015630 000274 .UORO 

3601 015632 002013 .UORO 
3602 

3603 I 

3604 015634 012704 001556 lOt: MOV 

3605 015640 012701 001546 MOV 

3606 015644 172411 tOO 

3607 015646 172014 AOOO 

3608 015650 170203 STFPS 

3609 015652 012701 001126 MOV 

3610 015656 174011 STO 

3611 015660 020327 003200 CMP 

3612 015664 001403 BEQ 

3613 015666 104000 ERROR 

3614 015670 000275 .UORO 

3615 015672 002013 .VORO 
3616 

3617 015674 012704 001566 111: MOV 

3618 015700 004767 164242 JSR 

3619 015704 005767 163130 TST 

3620 015710 001403 BEQ 

3621 015712 104000 EIWOR 

3622 015714 000276 .UORO 

3623 015716 002013 .UORO 
3624 

3625 015720 121: 
3626 

3627 , 

3628 I 

3629 015720 MSB: 

3650 ,,♦****•••*•• 



bb 

E 71 

OO UITH NEGATIVE OPERANDS 

COUNT 
8> 

272 

FPPERR 



SEQ O071 



5FSRC! > 

«TAB25.R4 

«TAB26,R1 

(Rl).ACO 

(R4).AC0 

R3 

«REC0ST.R1 
ACO.(Rl) 
R3.«3200 
9» 

273 

FPPERR 

•TAB27.R4 

R7.DATVER 

COUNT 

10» 

274 

FPPERR 

!-FSRC! < 

•TAB29.R4 

•TAB2S.R1 

CRD.ACO 

CR4).AC0 

RS 

«REC0ST,R1 
ACO.(Rl) 
RS.«S200 
lit 

275 
FRRERR 

♦TA«29A.R4 
R7.0ATVER 
COUNT 
12* 

276 

FPPERR 



I BRANCH IF GOOD 

I ALL ERRORS TO TRAP TO EMT VECTOR 
I UNIQUE ERROR NUMBER 
I ADDRESS OF ERROR MESSAGE 



AC 



I BAD FPS 



J POINT TO FSRC DATA 
iPOINT TO ACO DATA 
{LOAD ACO DATA 
i*TEST INSTRUCTION 
iSAVE STATUS 

I POINT TO RECEIVED DATA TABLE 

I SAVE ACO 

I VERIFY STATUS 
{BRANCH IF GOOD 

J ALL ERRORS TO TRAP TO EMT VECTOR 
» UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 

»P0INT TO EXPECTED OSATA 
; VERIFY DATA 



I BAD ACO 
!ACO! 



(BRANCH IF GOOD 

(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
t ADDRESS OF ERROR MESSAGE 



iBAO FPS 



{POINT TO FSRC DATA 
(POINT TC ACO DATA 
I LOAD ACO DATA 
(•TEST INSTRUCTION 
(SAVE STATUS 

(POINT TO RECEIVED DATA TABLE 

(SAVE ACO 

(VERIFY STATUS 
•BRANCH IF GOOD 

(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NlMER 
I ADDRESS OF ERROR MESSAGE 



(POINT TO EXPECTED DATA 
(VERIFY DATA 

( 

tWANCH IF GOOD 

(ALL ERRORS TO TRAP TO EMT VECTOR 

•UNIQUE ERROR NUMBER 

I ADDRESS OF ERROR ICSSAGE 



GLOBAL AREAb MAC>n 30A(10S2) 
KOJllA.MAC 15 MAR 64 1S:S1 



5631 








3632 








5633 


015720 






3634 


015720 


005267 


165060 


3635 


015724 


012702 


003200 


3636 


015750 


170102 




3637 


015752 


012704 


001456 


3636 


015756 


012701 


001126 


3639 


015742 


172414 




3640 


015744 


175014 




3641 


015746 


170205 




3642 


015750 


174011 




3643 


015752 


022705 


005204 


3644 


015756 


001405 




3645 


015760 


104000 




3646 


015762 


000277 




3647 


015764 


002015 




3646 








3649 


015766 


012704 


001256 


3650 


015772 


004767 


164150 


3651 


015776 


005767 


165056 


3652 


016002 


001405 




3653 


016004 


104000 




3654 


016006 


000500 




3655 


016010 


002015 




3656 








3657 


016012 


012704 


001406 


3658 


016016 


172414 




3659 


016020 


175014 




3660 


016022 


170205 




3661 


016024 


174011 




3662 


016026 


022703 


005204 


3663 


016052 


001405 




3664 


016034 


104000 




3665 


016056 


000301 




3666 


016040 


002015 




3667 








3666 


016042 


012704 


001256 


25669 


016046 


004767 


164074 


3670 


016052 


005767 


162762 


3671 


016056 


001405 




3672 


016060 


104000 




3673 


016062 


000502 




3674 


016064 


002015 




3675 








3676 


016066 






5677 








3678 








3679 


016066 






3680 








3681 








3682 








3683 


016066 






5684 


016066 


005267 


162712 


3685 


016072 


012702 


005200 


5686 


016076 


170102 





> MAR 64 
T54 



16:58 PAGE 72 , . , 

TEST SUB WITH EXPfACOl-EXPfFSRCl 



OEQ 0072 



i»TEST 54 



TEST SUB UITM EXP[AC01-EXP(FSRC] 



1 1 

TST54! 



II: 



21: 



SI: 



INC 


$TESTN 


» INCREMENT TEST NUMBER 


MOV 


«5200.R2 


J LOAD FPS DATA 


LOFPS 


R2 


iLOAO FPS 


MOV 


♦TAB21.R4 


iPOINT TO FSRC DATA 


MOV 


•RECDST.Rl 


iPOINT TO ACO RECEIVED DATA TABLE 


LOO 


(R4),AC0 


iLOAO ACO 


SUBO 
STFPS 


(R4).AC0 


l*TEST INSTRUCTION 


R5 


tSAVE STATUS 


STO 


ACO.(Rl) 


iSAVE ACO INTO RECOST 


CMP 


•5204, R5 


1 VERIFY STATUS 


BEQ 


K 


(BRANCH IF GOOD 


ERROR 




lALL ERRORS TO TRAP TO EMT VECTOR 


.WORD 


277 


(UNIQUE ERROR NUMBER 


.WORD 


FPPEHR 


(ADDRESS OF ERROR MESSAGE 
(BAD FPS STATUS 


MOV 


«TA66,R4 


(POINT TO EXPECTED DATA 


JSR 


R7.0ATVER 


(VERIFY ACO 


TST 


COUNT 


I 


BEQ 


21 


(BRANCH IF GOOD 


ERROR 




(ALL ERRORS TO TRAP TO EMT VECTOR 


.WORD 


500 


(UNIQUE ERROR NUMBER 


.UORO 


FPPERR 


(ADDRESS OF ERROR MESSAGE 

(BAD ACO 


MOV 


♦TA814,R4 


(POINT TO FSRC AND ACO DATA 


LDO 


(R4),AC0 


(LOAD ACO DATA 


sueo 


(R4).AC0 


(•TEST INSTRUCTION 


STFPS 


R5 


iSAVE FPS 


STO 


ACO.(Rl) 


(SAVE ACO INTO RECOST 


CMP 


•S204.Rn 


■ ApflWPw P^%P 

(VERIFY FPS 


BEQ 


51 


AA AA^^«^ VP ^ 

(BRANCH IF GOOD 


ERROR 




(ALL ERRORS TO TRAP TO EMT VECTOR 


.UOM) 


SOI 


(UNIQUE ERROR NUMBER 


.WORD 


FPPERR 


(ADDRESS OF ERROR MESSAGE 






MOV 


•TAB6.R4 


iPOINT TO EXPECTED DATA 


JSR 


R7.DATVCR 


(VERIFY ACO 


TST 


COUNT 




BEQ 


4t 


(BRANCH IF GOOD 


ERROR 




(ALL ERRORS TO TRAP TO EMT VECTOR 


.WORD 


502 


(UNIQUE ERROR NUr«ER 


.UORO 


rPPERR 


1 ADDRESS OF ERROR MESSAGE 



«•: 



tBAO ACO 



(•TEST 55 



TEST NORMALIZE 



II**** I 

TST55I 



INC ITESTN 
MOV #3200. R2 
LOTPS R2 



I INCREMENT 
iLOAD rPS 



TEST NUMBER 



1 e. 

GLOBAL AREAS MACtII S0A(10S2) IS MAR 84 16:58 PAGE 73 
KOJllA.MAC 15-HAR 84 15:51 T55 TEST NORMALl/E 



3687 


016100 


012705 


001606 




MOV 


«TAB5l,R5 


jPOINT TO rSRC DATA 


3686 


016104 


012701 


001576 




MOV 


ffTAB30.Rl 


iPOINT TO ACO DATA 


3689 


016110 


172411 






LDD 


(Rl).ACO 


iLOAD ACO 


3690 


016112 


173015 






SUBD 


(R5).AC0 


•♦TEST INSTRUCTION 


3691 














il LEFT SHIFT 


3692 


016114 


170203 






STFPS 


R3 


iSAVE STATUS 


3693 


016116 


012704 


001126 




MOV 


•RECDST,R4 


iPOINT TO RECOATA 


3694 


016122 


174014 






STD 


AC0.(R4) 


(SAVE ACO 


5695 


016124 


012701 


001636 




MOV 


«TAB34,R1 


iPOINT TO EXPECTED DATA 


3696 


016130 


004767 


164012 




JSR 


R7, DA TVER 


(VERIFY DATA 


3697 


016134 


005767 


162700 




TST 


COUNT 




3t>98 


016140 


001403 






BEQ 


1* 


(BRANCH IF GOOD 


3699 


016142 


104000 






ERROR 




(ALL ERRORS TO TRAP TO EMT VECTOR 


3700 


016144 


000303 






.WORD 


303 


(UNIQUE ERROR NUMBER 


3701 


016146 


002013 






.WORD 


FPPERR 


(ADDRESS OF ERROR MESSAGE 


3702 
3703 


016150 


012701 


001616 


11: 


nov 


♦TA632.R1 


• 

(ACO DATA 


3704 


016154 


012705 


001626 




MOV 


«TAB33.R5 


(FSRC DATA 


3705 


016160 


172411 






LDD 


(RD.ACO 


(LOAD ACO 


3706 


016162 


173015 






SUBO 


(R5),AC0 


(•TST INSTRUCTION 


3707 














(56 LEFT SHIFTS 


3708 


016164 


012701 


001126 




MOV 


•RCCOST.Rl 


(SAVE DATA 


3709 


016170 


174011 






STO 


ACO.CRl) 


( 


3710 


016172 


004767 


163750 




JSR 


R7.0ATVER 




3711 


016176 


005767 


162636 




TST 


COUNT 




3712 


016202 


001403 






BEQ 


21 


i 


3713 


016204 


104000 






ERROR 




(ALL ERRORS TO TRAP TO EMT VECTOR 


3714 


016206 


000304 






.UORO 


304 


1 UNIQUE ERROR NUMBER 


3715 


016210 


002013 






.UORD 


FPPERR 


t ADDRESS OF ERROR MESSAGE 


3716 














t 


3717 


016212 






2<: 








3718 














3719 


016212 






NUVAO: 








3720 
















3721 








i»TEST 


56 


TEST AOOO WITH OVERFLOW AND UNDERFlOU 


3722 
















3723 


016212 






TST56: 








3724 


016212 


005267 


162566 




INC 


•TESTN 


(INCREMENT TEST NUTSER 


3725 


016216 


012702 


000200 




MOV 


•200.R2 


(SETUP FLOATING POINT STATUS 


i72€> 


016222 


170102 






LOTPS 


R2 


iLDAD FPS 


3727 


016224 


012704 


001646 




MOV 


•TAa40.R4 


(POINT TO FSRC DATA 


3728 


016230 


012701 


001646 




HOV 


•TAB40.RI 


(POINT TO ACO DATA 


3729 


016234 


172411 






LOO 


(RD.ACO 


(LOAD ACO UITH TEST DATA 


3730 


016236 


172014 






AOOO 


<R«).ACO 


(•TEST INSTRUCTION 


3731 


016240 


1702O3 






STFPS 


R5 


(SAVE FPS 


3732 


016242 


012701 


001126 




MOV 


•RECDST.Rl 


(POINT TO RECEIVED DATA TABLE 


3733 


016246 


174011 






STO 


ACO.(Rl) 


(SAVE ACO RESULT 


3734 


016250 


022703 


0C0206 




CMP 


«206.P3 


•VERIFY STATUS 


3735 


016254 


001403 






BEQ 


It 


1 BRANCH IF GOOD 


3736 


016256 


104000 






ERROR 




(ALL ERRORS TO TRAP TO EMT VECTOR 


3737 


016260 


000305 






.WORD 


505 


(UNIQUE ERROR NUMBER 


d r OO 




002015 






.UORO 


FPPERR 


1 ADDRESS OF ERROR MESSAGE 


3739 














iBAO FPS 


3740 


016264 


012704 


001256 


1<: 


MOV 


*TAB6.R4 


iPGINT TO EXPECTED DATA 


3741 


016270 


004767 


163652 




JSR 


R7.0ATVER 


1 VERIFY DATA 


3742 


016274 


005767 


162540 




TST 


COUNT 



GLOBAL AREAS 
KOJllA.MAC 



3743 
3744 
3745 
3746 
3747 
3748 
3749 
3750 
3751 
3752 
3753 
3754 
3755 
3756 
3757 
3758 
3759 
3760 
3761 
3762 
3763 
3764 
3765 
3766 
3767 
3768 
3769 
3770 
3771 
3772 
3773 
3774 
3775 
3776 
3777 
3773 
3779 
3780 
3781 
3782 
3783 
3784 
3785 
3786 
3787 
3788 
3789 
3790 
3791 
3792 
3793 
3794 
3795 
3796 
3797 
3798 



MACtll 30A(1052) 
15 -MAR 84 15:51 

016300 001403 

016302 104000 

016304 000306 

016306 002013 



15 HAR-84 
T56 



16:58 PAGE 74 

TEST ADDD WITH OVERrLOU AND UNDERrLOU 



SEO O074 



016310 
016314 
016316 
016322 
016326 
016330 
016336 
016340 
016342 
016344 
01b346 

016350 
016352 
016356 
016360 
016364 
016366 
016370 
016372 

016374 
016376 
016402 
016404 
016406 
016410 

016412 
016414 
016420 
016424 
0164 SC 
016432 
016434 
016436 



016440 
016444 
016446 
016454 
016460 
016464 
016466 
016470 
016472 
016476 
016500 
016504 



012702 
170102 
012704 
012701 
172411 
012737 
172014 
170000 
104000 
000307 
002013 

170203 
012701 
174011 
022703 
001403 
104000 
000310 
002013 

012600 
022700 
001403 
104000 
000311 
002013 

012600 
012704 
004767 
005767 
001403 
104000 
000312 
002013 



012702 
170102 
012737 
012704 
012701 
172411 
172014 
170203 
012701 
174011 
022703 
001403 



001200 

001646 
001646 

016350 000244 



2»: 



001126 
101206 



23t: 



3ti 



016340 



41: 



001256 
163522 
162410 



SI: 



BEQ 


2* 


{BRANCH IF GOOD 


ERROR 




(ALL ERRORS TO TRAP TO EMT VECTOR 


.WORD 


306 


(UNIQUE ERROR NUMBER 


.WORD 


FPPERR 


(ADDRESS OF ERROR MESSAGE 






iBAD ACO 


}U TRAPS 


ENABLED 




MOV 


•1200. R2 


(SETUP FLOATING POINT STATUS 


LDFPS 


R2 


(LOAD FPS 


MOV 


♦TAB40.R4 


iPOINT TO FSRC DATA 


MOV 


•TAB40.R1 


(POINT TO ACO DATA 


LDD 


(Rl).ACO 


(LOAD ACO WITH TEST DATA 


MOV 


•3I.S«rPVEC 


(CHANGE TRAP VECTOR 


ADOD 


(R4).AC0 


(•TEST INSTRUCTION 


CFCC 






ERROR 




(ALL ERRORS TO TRAP TO EMT VECTOR 


.WORD 


307 


(UNIQUE ERROn NUMBER 


.WORD 


rPPERR 


(ADDRESS OF ERROR MESSAGE 






t FAILED TO TRAP ON OVERFLOU 


STFPS 


R3 


(SAVE FPS 


MOV 


«REC0ST.R1 


(POINT TO RECEIVED DATA TABLE 


STO 


ACO.(Rl) 


(SAVE ACO RESULT 


CMP 


♦101206. AS 


(VERIFY STATUS 


BEQ 


41 


(BRANCH IF GOOD 


ERROR 




(ALL ERRORS TO TRAP TO EMT VECTOR 


.WORD 


510 


(UNIQUE ERROR NUMBER 


.UORO 


FPPERR 


lADORESS OF ERROR MESSAGE 






iBM) FPS 


MOV 


(SP)*.m> 


(CHECK STORED PC 


CMP 


#2SI.R0 


1 


BEQ 


SI 


iBRANCH IF RETum* ADDRESS IS GOOD 


ERROR 




(ALL ERRORS TO TRAP TO EMT VECTOR 


.UORO 
.UORD 


511 


1 UNIQUE ERROR NUMBER 


FPPERR 


tAOORESS OF ERROR tCSSAGE 






iBAO RETURN MORESS 


nov 


(SP)*.IK> 


laEAN UP STACK 


MOV 


•TAB6.(M 


iPOINT TO EXPECTED DATA 


JSft 


RT.DATvEft 


tVERIFt DATA 


TST 


COUNT 




BEQ 


71 


(BRANCH IF GOOD 


ERftOR 




(ALL ERRORS TO TRAP TO EMT VECTOR 


.UQPO 


312 


(UNIQUE ERROR NlMER 


.WORD 


FPPEW 


i ADDRESS OF ERROR MESSAGE 



000200 

002106 
001276 
001656 



001126 
000204 



lUrOERFLOU TRAPS DISABLED 

71: - 



iBAO ACO 



000244 



MOV 
LOFPS 
MOV 
MOV 
MOV 
LOO 
AODO 
STFPS 
MOV 
STD 
CMP 
BEQ 



4200. R2 

R2 

•UL0TRP.S4FPVEC 

•TA67.R4 

4TAB41.R1 

(Rl).ACO 

(R4),AC0 

R3 

♦RECOST.Rl 
ACO.(Rl) 
4204. R5 
81 



(SETUP FLOATING POINT STATUS 

(LOAD FPS 

iREPLACE UILD TRAP VECTC^ 
iPOINT TO FSRC DATA 
tPOINT TO ACO DATA 
(LOAD ACO WITH TEST DATA 

(*TEST INSTRUCTION 

(SAVE FPS 

(POINT TO RECEIVED DATA TABLE 
.SAVE ACO RESULT 
(VERIFY STATUS 
I BRANCH IF GOOD 



Kb 



GLOBAL AREAS 
KOJllA.MAC 



HACtll 50A(1052) 
15 -MAR -84 15.51 



IS MAR 84 
T56 
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TEST AOOD UITH OVERFLOU AND UNOERFLOU 



SEQ 0075 



5799 


016506 


104000 






ERROR 




tALL ERRORS TO TRAP TO EMT VECTOR 


5800 


016510 


000515 






.WORD 


515 


1 UNIQUE ERROR NUMBER 


5801 


016512 


002015 






.WORD 


FPPERR 


1 ADDRESS OF ERROR MESSAGE 


3802 














{BAD FPS 


3803 


016514 


012704 


001256 


8«: 


MOV 


•TAB6.R4 


»POINT TO EXPECTED DATA 


3804 


016520 


004767 


163422 




JSR 


R7,DATVER 


(VERIFY DATA 


3805 


016524 


005767 


162510 




TST 


COUNT 




3806 


016550 


001405 






BEQ 


91 


(BRANCH IF GOOD 


3807 


016552 


104000 






ERROR 




iAlL errors TO 1RAP TO EMT VECTOR 


3808 


016554 


000514 






.WORD 


514 


(UNIQUE ERROR NUMBER 


3809 


016556 


002013 






.WORD 


FPPERR 


(ADDRE5/S OF ERR'JR MESSAGE 


3810 














(BAD ACO 


3811 
38 








1 UNDERFLOW TRAPS ENABLED 




016540 


012702 


002200 


9<: 


MOV 


•2200. R2 


(SETUP FLOATING POINT STATUS 


3813 


016544 


170102 






LOFPS 


R2 


(LOAJ FPS 


3814 


016546 


012737 


016600 000244 




MOV 


•11».»#FPVEC 


(REPOSITION TR/tf> VECTOR 


3815 


016554 


012704 


001276 




MOV 


•TAB7.R4 


(POINT TO FSRC DATA 


3816 


016560 


012701 


001656 




MOV 


•TAB41.R1 


(POINT TO ACO DATA 


3817 


016564 


172411 






LOO 


(Rl).ACO 


(LOAO ACO WITM TEST DATA 


3818 


016566 


172014 






AOOD 


(R4).AC0 


(•TESi INSTRUCTION 


3819 


016570 


170000 




101: 


CFCC 




(COPTY FPP CC 


3820 


016572 


104000 






ERROR 




(ALL ERRORS TO TRAP TO EMT VECTOR 


3821 


016574 


000515 






.WORD 


515 


(UNIQUE ERROR NUMBER 


3822 


016576 


002015 






.WORD 


FPPERR 


(AOORESS OF ERROR MESSAGE 


5823 














(FAILED TO TRAP ON UNDERFLOW 


3824 


016600 


170205 




lit: 


STFPS 


R5 


(SAVE FPS 


3825 


016602 


012701 


001126 




MOV 


•RECDST.Rl 


(POINT TO RECEIVED DATA TABLE 


3826 


016606 


174011 






STO 


ACO.(Rl) 


(SAVE ACO RESULT 


5827 


01661C 


022705 


102210 




CMP 


•102210. R5 


(VERIFY STATUS 


5828 


016614 


001405 






BEQ 


12* 


(BRANCH IF GOOD 


5829 


016616 


104000 






ERROR 




(ALL ERRORS TO TRAP TO EMT VECTOR 


5850 


016620 


000316 






.WORD 


S16 


(UNIQUE ERROR NUMBER 


5851 


016622 


002013 






.UOM> 


FPPERR 


(ADORE""' OF ERROR MESSAGE 


5852 














(BAD FPS 


5855 


016624 


012605 




12t: 


HOV 


(SP)..R5 


(GET ERROR PC 


5854 


016626 


020527 


016570 




CMP 


RS.«10» 


(VERIFr ERROR AOORESS ON STACK 


5855 


016652 


001405 






BEQ 


IS* 


(BRANCH IF GOOD 


5836 


016654 


104000 






ERROR 




(ALL ERRORS TO TRAP TO EMT VECTOR 


5857 


016656 


000517 






.UORO 


317 


(UNIQUE ERROR NUMKR 


5858 


016640 


002015 






.WORD 


FPPERR 


(AOORESS OF ERROR MESSAGE 


5859 














iBAO ERROR RETURN ON STACK 


5840 


016642 


005726 




13t; 


TST 


(SP). 


(RESTORE STACK 


5841 


016644 


012704 


001246 




MOV 


«TAe5A.R4 


(POINT TO EXPECTED DATA 


5842 


016650 


004767 


16S27;,; 




JSR 


RT.OATVER 


(VERIFY DATA 


5845 


016654 


005767 


162160 




TST 


COUNT 




3844 


016660 


001405 






BEQ 


14 1 


(BRANCH IF GOOD 


5845 


016662 


104000 






ERROR 




(ALL ERRORS TO TRAP TD EMT VECTOR 


5846 


016664 


000320 






.WORD 


520 


(UNIQUE ERROR NUMBER 


5847 


016666 


002013 






.UORO 


FPPERR 


(AOORESS OF ERROR MESSAGE 



5848 
5849 

3850 
5851 
5852 
5855 
5854 



016670 
016674 
016676 
016704 
016710 



012702 
170102 
012757 
012704 
012701 



000200 

002106 
001656 
001666 



000244 



(UNDERFLOW WITH TRAPS 0IS6LED - 
14 t: MOV •200. R2 

LOFPS R2 

MOV •WLDTRP.Q#FPVEC 
MOV •TA641.R4 
MOV •TAB42.RL 



{BAD ACO 
N0N-7ER0 RESULT 

(SETUP FLOATING POINT STATUS 
tLOM) FPS 

(RESTORE TRAP VECTOR 
(POINT TO FSRC DATA 
(POINT TO ACO DATA 



GLOBAL AREAS MACyH 30A(1052) 15 MAR-84 
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3855 
3856 
3857 
3858 
3859 
3860 
3861 
3862 
3863 
3864 
3865 
3866 
3867 
3868 
3869 
3870 
3871 
3872 
3873 
3874 
3875 
3876 
3877 
3878 
3879 
3880 
3881 
3882 
3883 
3864 
3885 
3886 
3887 
3888 
3889 
3890 
3891 
3892 
3893 
3894 
3895 
3896 
3897 
3898 
3899 
3900 
3901 
3902 
3903 
3904 
3905 
3906 
3907 
3908 
3909 
3910 



016714 
016716 
016720 
016722 
016726 
016730 
016734 
016736 
016740 
016742 

016744 

016750 
016754 
016760 
016762 
016764 
016766 



016770 
016774 
016776 
0170O4 
017010 
017014 
017016 
017020 
017022 
017024 
017026 

017030 
017032 
017036 
017040 
017042 
017044 
017050 
017052 
017054 
017056 

017060 
017064 
017066 
017070 
017072 

017074 
017100 
017104 
017110 
017112 
017114 
017116 



172411 
172014 
170203 
012701 
174011 
022703 
001403 
104000 
000321 
002013 

012704 
004767 
005767 
001403 
104000 
000322 
002013 



012702 
170102 
012737 
012704 
012701 
172411 
172014 
170000 
104000 
000323 
002013 

170203 
012701 
174011 
012600 
005726 
022700 
001403 
104000 
000324 
002013 

022703 
001403 
104000 
000325 
002013 

012704 
004767 
005767 
001403 
104000 
000326 
002013 



001126 
000204 



001256 
163172 
162060 



151 



102200 

017030 000244 

001656 

001666 



161 



001126 



017020 



102204 



001676 
163042 
161730 



17» 



18^ 



19» 



20* 



I 6 

:58 PAGE 76 SEQ O07», 

TEST AOOO WITH OVLRFLOW AND UNOERFLOU 



LOO 


(Rl).ACO 




(LOAD ACO WITH TEST DATA 


AOOO 


C R4 ) , ACO 




l»TEST INSTRUCTION 


STf PS 


R3 




»SAVE FPS 


MOV 


•RECDST ,R1 




iPQINT TO RECEIVED DATA TABLE 


STO 


AC0,(R1) 




iSAVE ACO RESULT 


CMP 


♦204 ,R3 




iVEhIFT STATUS 


8EQ 


151 




1 BRANCH IF GOOD 


ERROR 






J ALL ERRORS TO TRAP TO EMT VECTOR 


.WORD 


321 




(UNIQUE ERROR NUMBER 


.WORD 


FPPERR 


iBAO 


1 ADDRESS Or ERROR MESSAGE 

FPS 


MOV 


•TAB6iR4 




jPOINT TO EXPECTED DATA 


JSR 


R7.0ATVER 




jVERIFT DATA 


TST 


COLMT 






OCA 

BEQ 


161 




, BRANCH IF GOOD 


ERROR 






,ALL ERRORS TO TRAP TO EMT VECTOR 


.WORD 


322 




(UNIQUE ERROR NUMBER 


.Uqhu 


rPPfeRR 


iBAO 


(ADDRESS OF ERROR MESSAGE 

ACO 


lU HITM 


TBAQC CkiADI CtS 

TRAro cNAdLED 


- NON-ZERO RESULT 


MOV 


#102200, H? 




(SETUP FLOATING POINT STATUS 


LOFPS 


R2 




(LOAD FPS 


MOV 


#101 ivf^ PVcC 




(RESTORE TRAP VECTOR 


MOV 


A TAB A 4 BA 

#TAB41 ,R4 
•TAo42,Rl 




(POINT TO FSRC DATA 


MOV 




(POINT TO ACO DATA 


LOO 


/BIN 

CR17.AC0 




(LOAD ACO UITH TEST DATA 


AOOO 


vR4 7,AC0 




(•TEST INSTRUCTION 


CrCC 






ERnQR 






(ALL ERRORS TO TRAP TO EMT VECTOR 


.UORD 


523 




(UNIQUE ERROR Nur«ER 


.UURU 


F PPtRH 




(ADDRESS OF ERROR MESSAGE 






iNO 


TRAP ON UNOERFLOU 


Sir PS 


RS 


(SAVE FPS 


f*OV 


WC COST •Hi 




(POINT TO RECEIVED DATA TABLE 


STO 


ACO*CRI) 




(SAVE ACO RESULT 


NOV 






(SAVE STACK CONTENTS 


T5T 


C5R)» 




(CLEAN UP STACK 


CnP 


9\7t ,RO 




(VERIFY RETURN ADDRESS 








(BRANCH IF GOOD 


CNKUlf 






(ALL ERRORS TO TRAP TO EMT VECTOR 


.UgRO 






(UNIQUE ERROR NUMBER 


.WORD 


FFPtRR 




(ADDRESS OF ERROR fCSSAGE 






iBAO RETURN ADDRESS 


CMP 


#102204 ,R5 




(VERIFY STATUS 


BCQ 






(BRANCH IF GOOD 


cRROR 






(ALL ERRORS TO TRAP TO EMT VECTOR 


• WORD 






(UNIQUE ERROR NUMBER 


.UORO 


FPPtRR 




(ADDRESS OF ERROR MESSAGE 






tBAD TPS 


MOV 


AT ABA V Ba 

#TAp43,R4 




(POINT TO EXPECTED DATA 








(VERIFY DATA 


TST 


COUNT 






BEQ 


2U 




(BRANCH IF GOOD 


ERROR 






(ALL ERRORS TO TRAP TO EMT VECTOR 


.UORO 


326 




(UNIQUE ERROR NUMBER 


.WORD 


FPPERR 




(ADDRESS OF ERROR MESSAGE 



116 
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TQ1 1 

J^i. 1 














t DHU 


am 










PI < • 
el • : 




























T01 A 




































97 lo 


















XQ1 7 








j^TEST 


57 


TEST LDCrO. LDCOF 






















07l 7 








TST57: 










07C\/ 


A1 71 9n 
r lev 


OOS9A7 






INC 






1 TMTQFMFMT TFCT ItflMRPD 
1 xnw~cri&ri 1 1 C3 1 FVuriDl.n 


■J7CX 








1 TRUNCATE 








d7ee 


rtl 71 34 


Ol 370P 
U Xc ' Uc 


vVvdW 




MOV 


axoo qp 






XQ9X 




1 701 OP 
X ' VXVc 






LDFPS 


RP 




■ 1 nan tpq 


O 7C^ 


ftl 7 1 XD 


Ol P704 
VXc ' VH 


WX r Vv 




hOV 


4TAR4S R4 




ffPOTKiT TO rcor nara 




m 71 xt\ 


Ol P701 
VX^ ' VX 






MOV 

< IV w 


•TAB6 Rl 




1 ~UXri 1 1 V HUv 1 n 


07CO 


ni 7149 


1 7P41 1 
X ' X X 






ldd 


fRi ) Aro 

\ n X / ■ "wV 




■ 1 oon aro utth tp<st naTa 


HQS? 

07C f 


m 7 1 44 


1 774P4 








( R4 ^ * APO 






■J7CO 


01 714#> 


Ol P701 
VXc f VX 


VA/XXCv 




MOV 


ARFTOST Rl 

wT^tWW J • (FIX 






07C 7 


0171 S3 
^/X ' X3c 


1 7401 1 
X ''^VXX 






STO 


Aro r R 1 ^ 

M^V « \ n X J 




. cawF am qf^ii t 


X4xn 


m 71 ■%4 

wX f X^^ 


0PP704 
vcc ' v*t 


wx ■ xc 




CMP 


•TAfi4^*4 R4 




tWFRTrY OlJTn.TMr 
(YCnx* f P*W>w"Xr^ 


<J 70X 


01 71 AO 
wX ' XOw 


00140X 






BEQ 


1 1 

X w 




ffAQAMTH TF nnnn aiiTn.Tinr 




01 71#l? 
VX ' XvC 


104000 
X v^ v/w 






ERROR 






fAil FQOnP^ Tn TQAP TCi FMT WFTTnO 




01 714«4 
VX ' xo^ 


OOOTP7 






.WORD 


527 




tIMTmiF FOOnO MMRFQ 




01 71M« 

VX ■ XOv 


WCVX J 






.WORD 


FPPERR 




















iBAD 


AllTfl. TMT 


•J 7 


01 71 70 
VX * X f V 


Ol P704 
VXc ' V^ 


WX * xo 


It • 

X ▼ ♦ 


MOV 


*TAB46.R4 




• pnTMT Tn FypprTPn naTa 


3957 


01 71 74 
VX f X 1 ^ 


0047A7 
VVH 1 O » 


XvC 




JSR 


R7.0ATVER 




1 vFQTFv naTA 




01 7POO 

VX » t\A/ 


OOS7A7 


1 AIA'U 
XOXvw^ 




TST 


COUNT 






3939 


01 7904 
VX * cv*» 


001 40X 






BEQ 


21 




1 BRANCH IF GOOD 


3940 


VX * cvo 


104000 
XV^VW 






ERROR 






(ALL ERRORS TO TRAP TO EMT VECTOR 




017210 


nooxxo 






.UORO 


3S0 




{UNIQUE ERROR NUMBER 


3942 


VX f cxc 


OOPA1 X 

VVcVXJ 






.WORD 


FPPERR 




t ADDRESS or ERROR MESSAGE 


3943 














]BAO ACO 


3944 








1 AUTO- 


INC DOUBLE MODE 






3945 


01 7?14 


oo*>onp 




Pt • 


CLR 


R2 




J SETUP FLOATING POINT STATUS 


3946 


017216 

017PPO 
VX • ccv 


1 7010P 

X * VXVc 






LOFPS 


R2 




tLOAD FPS 


3947 


Ol P7A4 
VXC » \^ 


001 7A^ 
WX ' wO 




MOV 


•TAa45.R4 




tPOINT TO FSRC DATA 


3948 


0172P4 


01P701 

VXC * VX 


\/VX~Cv 




NOV 


•TAB16.R1 




1 POINT TO ACO DATA 


3949 


01723O 


1 7P4 1 1 

X * c^ X X 






LOO 


(RD.ACO 




iLOAD ACO UITH TEST DATA 


3950 


017PS? 

WX * W^C 


1 774P4 






LDCOF 


(R4)».AC0 




l*TEST INSTRUCTION 


3951 


017P34 

VX ' C 


0P04P7 


nni 71 A 
\/vx • xo 




CMP 


R4,«TA84S*10 




•VERIFY AUTO -INC 


3952 


Ol 7940 
VX » t^v 


00140X 






BEO 


5« 




1 BRANCH IF GOOD 


3953 


01724? 

VX * C~w 








ERROR 






8 ALL ERRORS TO TRAP TO EMT VECTOR 


3954 


017244 


OOOXX1 






.UORO 


SSI 




1 UNIQUE ERROR NUMBER 


3955 


017246 


00P01 X 

WCVX 






.WORD 


FPPERR 




1 ADDRESS OF ERROR MESSAGE 


39S6 














(BAD 


AUTO -INC ON DOUBLE 


3957 


01725O 


1 70P0X 
X rvcVO 




5«: 


STFPS 


R5 




iSAVE FPS 


3958 


W X > C 


01P701 

VXC r WX 


001 1PA 
\A/X XCO 




MOV 


•RECOST.Rl 




iPOINT TO RECEIVED DATA TABLE 


3959 


017PS6 


1 7401 1 
X f ^vxx 






STD 


ACO.(Rl) 




iSAVE ACO RESULT 


3960 


VX * CvW 


0PP70X 
vcc * v^ 


www 




CMP 


«0,R3 




1 VERIFY STATUS 


3961 


017264 


001403 






BEQ 


4< 




1 BRANCH IF GOOD 


3962 


017266 


104000 






ERROR 






lALL ERRORS TO TRAP TO EMT VECTOR 


3963 


017270 


000332 






.WORD 


S32 




1 UNIQUE ERROR NUMBER 


3964 


017272 


002013 






.UORO 


FPPERR 




1 ADDRESS OF ERROR MESSAGE 


3965 














tBAO 


FPS 


3966 


017274 


012704 


001756 


4t: 


MOV 


*TAB49.R4 




iPOINT TO EXPECTED DATA 



Nb 



GLOeAt. AREAS MACYll. 30AC1052) 
KOJllA.MAC 15 MAR 84 15:51 



15 MAR 



16:58 PAGE 78 

TEST LOCrO. LDCDF 



3967 
3968 
3969 
3970 
3971 
3972 
3973 
3974 
3975 
3976 
3977 
3978 
3979 
3980 
3981 
3982 
3983 
3984 
3985 
3986 
3987 
3988 
3989 
3990 
3991 
3992 
3993 
3994 
3995 
3996 
3997 
3998 
3999 
4000 
4001 
4002 
4003 
4004 
4005 
4006 
4007 
4008 
4009 
4010 
4011 
4012 
4013 
4014 
4015 
4016 
4017 
4018 
4019 
4020 
4021 
4022 



017300 
017304 
017310 
017312 
017314 
017316 



017320 
017324 
017326 
017330 
017334 
017336 
017340 
017342 
017346 
017350 
0173S2 
017354 



017356 
017362 
017364 
017370 
017374 
017376 
017400 
017402 
017406 
017410 
017414 
017416 
017420 
017422 

017424 
017430 
017434 
017440 
017442 
017444 
017446 



017450 
017454 
017456 
017462 
017466 
017470 
017472 
017474 
017500 
017502 



004767 
005767 
001403 
104000 
000333 
002013 



012702 
170102 
005003 
177427 
005203 
005203 
005203 
022703 
001403 
104000 
000334 
002013 



012702 
170102 
012704 
012701 
172411 
177414 
170203 
012701 
174011 
022703 
001403 
104000 
000335 
002013 

012704 
004767 
005767 
001403 
104000 
000336 
002013 



C12702 
170102 
012704 
012701 
172411 
177414 
170203 
012701 
174011 
022703 



162642 
161530 



000200 
043243 

000003 



000200 

001726 
001706 



001126 
000210 



001746 
162512 
161400 



000200 

001256 
001746 



001126 
000204 



R7.0ATVER 
COUNT 
5» 

333 

FPPERR 



JSR 
TST 
BEQ 
ERROR 
.UORO 
.WORD 

iLDCFO GR7 
5t: nOV 

LOFPS 

CLR 

LOCFO 

ZNC 

INC 

INC 

CMP 

8EQ 

ERROR 

.WORD 

.UORD FPPERR 

•NEGATIVE OPERANDS 
6t: 



•200. R2 
R2 
R3 

•5203.AC0 
R3 
R3 
R3 

«3.R3 
61 

334 



71: 



nov 


•200. R2 


LOFPS 


R2 


MOV 


•TAB47.R4 


nov 


•TAB4S.R1 


LOO 


(Rl).ACO 


LOCFO 


(R4).AC0 


STFPS 


RS 


NOV 


•RECOST.Rl 


STD 


ACO.(Rl) 


CMP 


•210. R3 


BEQ 


71 


ERROR 




.UORO 


355 


.UORD 


FPPERR 


MOV 


•T/«48.R4 


JSR 


R7.0ATVER 


TST 


COUNT 


BEQ 


6t 


ERROR 




.UORO 


3S6 


.UORO 


FPPERR 



iLOAO A ZERO 
8$: MOV 

LOFPS 

MOV 

MOV 

LOO 

LOCFO 

STFPS 

MOV 

STO 

CMP 



•200. R2 
R2 

•TAB«.R« 
•TAB4e.Rl 

(Rl).ACO 
CR4}.AC0 
RS 

•RECOST.Rl 
ACO.(Rl) 
•204. R3 



(VERIFY DATA 
(BRANCH IF GOOD 

(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 

BAD ACO 

(SETUP FLOATING POINT STATUS 
(LOAD FPS 

(*TEST INSTRUCTION 



(IF LOCFO UORKEO. R3 SHOULD-3 
(VERIFY CORRECT PROGRAM FLOU 
(BRANCH IF GOOD 

(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
lAOORESS OF ERROR MESSAGE 
BAD PROGRAM FLOU 

(SETUP FLOATING POINT STATUS 

(LOAD FPS 

(POINT TO FSRC DATA 
(POINT TO ACO DATA 
(LOAD t^O UITH TEST DATA 

(•TEST INSTRUCTION 

(SAVE FPS 

(POINT TO RECEIVED DATA TABLE 
(SAVE ACO RESULT 
(VERIFY STATUS 
(BRANCH IF GOOD 

(ALL ERRORS TO TRAP TO EHT VECTOR 

(UNIQUE ERROR NUIttER 

t ADDRESS OF ERROR MESSAGE 

BAD FPS 

tPOINT TO EXPECTED DATA 
iVERIFY DATA 

(BRANCH IF GOOD 

(ALL ERRORS TO TRAP TO EMT VECTOR 
iUNIQUE ERROR NUMBER 
lAOORESS OF ERROR MESSAGE 

iBAO ACO 

I SETUP FLOATING POINT STATUS 

iLOAO FPS 

(POINT TO FSRC DATA 
(POINT TO ACO DATA 
•LOAD ACO UITH TEST DATA 
(•TEST INSTRUCTION 

I SAVE FPS 

I POINT TO RECEIVED DATA TABLE 
(SAVE ACO RESULT 
(VERIFY STATUS 



B ( 

GCOBAc AREAS MAC>11 S0A(10S2) IS MAR 64 16:58 PAGE 79 SEQ O079 

KOJllA.HAC 15 MAR -84 15:51 T57 TEST LDCfO. LOCDF 



4025 


017506 


001405 








BEQ 


91 


(BRANCH IF GOOO 




4024 


017510 


104000 








ERROR 




lALL ERRORS TO TRAP TO EMT 


VECTOR 


4025 


017S12 


000557 








.WORD 


557 


1 UNIQUE ERROR NUMBER 




4026 


017514 


002015 








.WORD 


FPPERR 


lAOORESS OF ERROR MESSAGE 




4027 












iBAO 


FPS 




4026 


017516 


012704 


001256 




91 


MOV 


«TAB6.R4 


iPOINT TO EXPECTED 


OATA 


4029 


01 7522 


004767 


162420 






JSR 


R7.DATVER 


1 VERIFY OATA 




4050 


017526 


005767 


161506 






TST 


COUNT 






4051 


017552 


001405 








BEQ 


101 


{BRANCH IF GOOO 




4052 


017554 


104000 








ERROR 




lALL ERRORS TO TRAP TO EHT 


VECTOR 


4055 


017556 


000540 








.WORD 


540 


•UNIQUE ERROR NUMBER 




4054 


017540 


002015 








.WORD 


FPPERR 


lAOORESS OF ERROR MESSAGE 




4055 












iBAO 


ACO 




4056 


017542 








10*: 








4057 




















4056 










1 










4059 


017542 








MCMPD: 








4040 










1 1 










4041 










i*TEST 60 


TEST CMPO 






4042 










1 1 










4045 


017542 








TST60: 








4044 


017542 


005267 


161256 






INC 


•TESTN 


•INCREMENT TEST NUMBER 




4045 










1 


CMPD UITM FRSC-ACO-0 






4046 


017546 


005057 


001042 






CLR 


a«FLAG 


•SIGNAL THAT ACO REMAINS CONSTANT 


4047 


017552 


004767 


000152 






JSft 


R7.CMPRTN 


•ROUTINE TO TEST OATA 




4048 


017556 


000000 


000000 


000003 




.UORO 


0,0.0,0 


•ACO AT START 




4049 


017564 


000000 
















4050 


017566 


000000 


000000 


000000 




.WORD 


0,0.0.0 


1 * SRC AT 31 AW 1 




4051 


017574 


000000 
















4052 


017576 


000200 








.UORO 


200 


|FPS AT START (0) 




4055 


017600 


000204 








.UORO 


204 


iFPS AT ENO 




4054 










t 


CMPO UITH EXP(FSftC1-0. EXP(AC01-0 






4055 


017602 


012757 


000001 


001042 




MOV 


•1,S«FLAC 


•SIGNAL THAT ACO UILL • 0 




4056 


017610 


004767 


000114 






JSR 


R7.CMPRTN 


•ROUTINE TO TEST DATA 




4057 


017614 


000000 


000000 


000000 




.UORO 


0.0.0. 12S252 


lACO AT START 




4058 


017622 


125252 
















4059 


017624 


000100 


000022 


000125 




.UORO 


100.22.125.125 


iFSRC AT START 




4060 


017652 


000125 
















4061 


017654 


000200 








.UORO 


200 


,FPS AT START (0) 




4062 


0176 V. 


000204 








.UORO 


204 


,FPS AT ENO 














1 


CMPO FSRC»EXP(ACOI-0 






4064 


017640 


005057 


001042 






CLR 


S«FLAG 


lACO REMAINS UNCHANGED 




4065 


017644 


004767 


000060 






JSR 


R7,CMPRTN 


(ROUTINE TO TEST DATA 




4066 


017650 


000400 


012546 


012546 




.UORO 


400.12546.12546.25 


|ACO AT START 




4067 


017656 


000025 












iFSRC AT START 




4068 


017660 


000200 


000000 


000000 




.UORO 


200.0,0.0 




4069 


017666 


000000 
















4070 


017670 


000200 








.UORO 


200 


|fPS AT START (0) 




4071 


017672 


000210 








.UORO 


210 


|FRS AT EM) 




4072 










1 


CMPO FSRC-ACO>0 


(ROUTINE TO TEST DATA 




4075 


017674 


004767 


000050 






JSR 


R7,CMPRTN 




4074 


017700 


077777 


177777 


177777 




.UORO 


77777, -l. -I, l 


(ACO AT START 




4075 


017706 


177777 
















4076 


017710 


077777 


177777 


177777 




.UORO 


77777.-1. -I. l 


iFSRC AT START 




4077 


017716 


177777 
















4078 


017720 


000200 








.UORO 


200 


|FPS AT START (D) 





oLOBAl arias MACin 30A(1052) 
KOJUA.MAC 15-riAR 84 15:51 



U < 



iSHAR^gJ 



SEO 0080 



079 
080 
081 
082 
083 
084 
085 
086 
087 
088 
089 
090 
091 
092 
095 
094 



151 
132 
133 
134 



017722 
017724 



000204 
000167 



000126 



.WORD 
JMP 



204 
H0P44 



iTPS AT tHO 

I HOP OVER SUBROUTINE 



•x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x«x*x*x 

COMPARE ROUTINE DATA TABLES 

ACO 
^ jRC 

TPS BEFORE EXECUTION 
FPS AFTER EXECUTION 
(FEC) 

*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x 
*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x 



4095 


017730 


012605 




CnPRTN: 


MOV 


(SP)» iRS 


t RETURN ADDRESS TO USE AS POINTER 


4096 


017732 


012702 


000200 




MOV 


#200, R2 


iSET TO DOUBLE MODE FOR LOAD 


4097 


017736 


170102 






LDFPS 


R2 


iLOAD FPS 


4098 


017740 


010504 






MOV 


R5,R4 


1 POINT TO FSRC DATA 


4099 


017742 


062704 


000010 




AOO 


•10, R4 


1 


4100 


017746 


010501 






MOV 


R5.R1 


•POINT TO ACO DATA 


4101 


017750 


1 724 1 1 






LDD 


(RD.ACO 


1 A An A A A ■ • V Vk_a ^ V A A V A 

iLOAO ACO UITH TEST DATA 


4102 


017752 


016502 


000020 




MOV 


20(R5),R2 


iCET TEST FPS 


4103 


017756 


170102 






LDFPS 


R2 


1 AAA VP^V f Af* 

iLOAD TEST FPS 


• 104 


017760 


175414 




It: 


CMPO 


( R4 ) , ACO 


l*TEST INSTRUCTION 


• 105 


017762 


170205 






STFPS 


R5 


iSAVE FPS 


• 106 


017764 


012702 


000200 




MOV 


#200, R2 


iSET FPP TO DOUW.E 


• 10 ' 


017770 


170102 






LDFPS 




• 108 


017772 


012701 


001126 




MOV 


«REC0ST,R1 


(POINT TO RECEIVED DATA TABLE 


• 109 


017776 


174011 






STD 


ACO.(Rl) 


iSAVE ACO RESULT 


A 1 1 A 




A'^f CAT 


000022 






22(1*3 )«R9 


iVtHIFT STATVo 


• 111 


020004 


00)405 






BEQ 


2t 


1 BRANCH IF GOOD 


• 112 


020006 


104000 






EAROR 




lALL ERRORS TO TRAP TO EMT VECTOR 


• 113 


020010 


000541 






.UORO 


541 


1 UNIQUE ERROR NUr«ER 


• 114 


020012 


002013 






.UORO 


FPPERR 


1 ADDRESS OF ERROR MESSAGE 


• 115 














iBAD FPS 


4116 


020014 


005 ■'37 


001042 


2t: 


TST 


a#FLAG 


• SEE IF ACO REMAINS UNC»MNGED 


• 117 


020020 


001405 






BEQ 


St 


iBRANCH IF ACO STAYS T»C SAME 


• 118 


020022 


012704 


001256 




nov 


•TAB6.R4 


|ACO*0 


• 119 


020026 


000401 






6A 


4t 


iGO VERIFt DATA 


• 120 


020050 


010504 




SI: 


MOV 


R5.R4 


•POINT TO EXPECTED DATA 


• 121 


020032 


004767 


162110 


4lj 


JSA 


R7,0ATVER 


•VERIFY DATA 


• 122 


020056 


005767 


160776 




TST 


COUNT 




• 123 


020042 


001405 






BEQ 


5» 


•BRANCH IF GOOD 


• 124 


020044 


104000 






ERROR 




•ALL ERRORS TO TRAP TO EMT VECTOR 


• 125 


020046 


000342 






.WORD 


S42 


• UNIQUE ERROR NUWER 


• 126 


020050 


002015 






.WORD 


FPPERR 


•AOORESS OF ERROR MESSAGE 


• 127 














•BAD ACO 


• 128 


020052 


000165 


000024 


51: 


JMP 


24(R5) 


•RETURN 


• 129 

• 1^ 


020056 






H0P44; 







020056 



MOIVFs 
»•••♦•' 



uLOBAu ARMS 
KDJllA.MAC 



NACUI S0A(105i) 
15 MAR 84 15:51 



15«AR^|4 



16: 



»155 








I^TEST 


61 


TEST DIVF 


4156 














»157 


020056 






TST61: 






• 158 


020056 


005267 


160722 




INC 


»*ESTN 


»159 








il/EXPfACl-FSRC 


"0 


»140 


020062 


012757 


000002 001042 




MOV 


^2tS«r LAG 


• 141 


020070 


004767 


000706 




JSR 


R7 (OvFSlW 


• 142 


020074 


000100 


000027 




.UORO 


100, 27 






AAAAAA 






.WORD 


ft ft 


U44 


020104 


000100 


000027 




.WORD 


100.27 


• 145 


020110 


040000 






.WORD 


40000 


• 146 


020112 


140000 






.WORD 


140000 


1147 


020114 


000004 






.WORD 


4 



148 
149 



»2/AC-EXPirSRC)-0 
I TRAPS ENABLED 





ft3ft1 1 
Ucvl lO 




VWWl 


ftfti n43 

VA/l\^C 


MOV 


*1.S«FLAG 




A3A1 3A 








JSR 


R7.DVFSUB 




ft3ft1 Xft 








.WORD 


0,0 




ftDAI 
UcVld* 








.WORD 


100.0 


LI *«A 


ft3ft1 Aft 




www 




.UORO 


0.0 












.WORD 


0 




ft^OI Aft 








.WORD 


100000 




n3ni ^ft 








.WORD 


4 


* 130 










i3/rSRC>AC0-0 




* 137 


ft3ft1 ^3 








CLR 


a«FLAG 


11 

*iov 


UcV130 


IV%A7A7 






JSR 


R7.0VFSUe 


1161 
1 lO A 


ft3ft163 
vcwio« 


77 


VWC<9^ 




.UORO 


177.234 


11 A3 
► Ivc 


n3fti*u. 

UcvlfKl 




V\/WW 




.UORO 


4100.0 




ft3ft1 73 


www 


vUWW 




.UORO 


0.0 




OPAI 76 








.UORO 


7400 




n3030A 








.UORO 


7404 


11 










i4/AC0>EXPtFSRCJ-0 


1167 




Ol ^7X7 


w\An/ 4 




HOV 


•l.StFLAG 


il68 










JSR 


R7. DVT SUB 












.UORO 


40200.104210 


H70 


020220 


w\/ Ac J 






.UORO 


125.2S2S2 


H71 


020224 


040200 


104210 




.UORO 


40200,104210 


H72 


020230 


007557 






.UORO 


7557 


H73 


020232 


107557 






.UORO 


107557 


H74 


020234 


000004 






.UORO 


4 


H75 










iS/exPrACl-EXPt'^SRCl 


H76 


020236 


005037 


001042 




CLR 


B«rLAC 


H77 


020242 


004767 


000534 




JSR 


R7,ovrsuB 


1178 


020246 


077760 


177777 




.UORO 


77760. 1 


H79 


020252 


077760 


000000 




.UORO 


77760,0 


1160 


020256 


040200 


104210 




.uORO 


4020C, 104210 


>181 


020262 


007414 






.UORO 


7414 


1182 


020264 


007400 






.UORO 


7400 


1185 










»6/AC»FSRC 




1184 


020266 


005037 


001042 




CLR 


MTLAC 


1185 


020272 


004767 


000504 




JSR 


RT.OVTSUe 
52525.52525 


1186 


020276 


052525 


052525 




.UORO 


H87 


020302 


052525 


052525 




.UORO 


52525,52525 


1188 


020306 


040200 


000000 




.UORO 


40200.0 


H89 


020312 


007400 






.WORD 


7400 


1190 


020314 


007400 






.UORO 


7400 



SEQ ooei 



I INCREMENT TEST NUMBER 

iNO INTERRUPT, BUT FEC 
I 00 TEST 

lACO 
iFSRC 
iRESULT 
» TEST FPS 
I RESULT FPS 
iFEC 



{INTERRUPT 
I 00 TEST 

|ACO 
iFSRC 
I RESULT 
I TEST FPS 
•RESULT FPS 
iFEC 

I NO INTERRUPT 

lOO TEST 

lACO 
tFSRC 
•RESULT 
I TEST TPS 
iRCSULT FPS 

I INTERRUPT 
tOO TEST 

lACO 
iFSRC 
iRESULT 
I TEST FPS 
iRCSULT FPS 
|FEC 

iMO INTERRUPT 

lOO TEST 
lACO 

iFSRC 
iRESULT 
I TEST FPS 
|RESiA.T FPS 

iNO INTERRUPT 

lOO TEST 

tACO 

iFSRC 

iRESULT 
I TEST FPS 
iRESULT FPS 



L / 



GLOBAL. 


AREAS 


MACUl 


IT A A/* « AK \ 

30A( 1052 ) 


KOJllA 


MAC 15 MAR 64 


15:51 


4191 








4192 


020316 


005037 


001042 


4195 


020322 


004767 


000454 


4194 


020326 


077777 


125252 


4195 


020332 


040300 


OOOOOO 


4196 


020336 


077652 


070707 


4197 


020342 


007400 




4196 


020344 


007400 




4199 








4200 


020346 


005037 


001042 


4201 


020352 


004767 


000424 


4202 


020356 


055377 


177777 


4203 


020362 


055300 


OOOOOO 


4204 


020366 


040252 


125252 


4205 


020372 


000000 




4206 


020374 


000000 




4207 








4208 


020376 


005037 


001042 


4209 


02O402 


004767 


000374 


4210 


020406 


064600 


000001 


4211 


020412 


OoooOO 


OOOOOO 


4212 


020416 


036200 


000001 


4213 


020422 


000000 




4214 


020424 


OOOOOO 




4215 








4216 


020426 


005057 


001042 


4217 


020432 


AAA ^ 

0O4767 


000344 


4218 


020436 


012345 


156024 


4219 


020442 


005600 


OOOOOO 


4220 


020446 


AA a ^ AC 

044745 


156024 


4221 


020452 


000017 




4222 


020454 


AAAAAA 

OOOOOO 




4223 








4224 


02O4S6 


AAE A V ^ 

005037 


001042 


4225 


020462 


0O4767 


000314 


4226 


020466 


040422 


101010 


4227 


020472 


140511 


101010 


4226 


020476 


140072 


020167 


4229 


O2O502 


AAAAC "y 

0O0057 




4230 


0^504 


AAAAC A 

OO0050 




4231 








4232 




AAC A V y 

005037 


001042 


4233 


02O512 


AAA H 

004767 


000264 


4234 


02O516 


160077 


000101 


4235 


020522 


AA AA 9 1 

040417 


177777 


4236 


020526 


157651 


143527 


4237 




000007 




4238 


020554 


AAAA * A 

000010 




4239 








4240 


020536 


005037 


001042 


4241 


020D42 


AAA y^ T 

004767 


000234 


4242 




A^A« AA 


000177 


4243 


020552 


040300 


OOOOOO 


4244 


020556 


060000 


000124 


4245 


020562 


000040 




4246 


020564 


000040 





15 MAR -64 
T61 



16 



PAGE 82 
ST OIVF 



i7/FSRC>0<AC0. ROUND 



CLR 
JSR 
.UORO 
.WORD 
.UORO 
.UORO 
.UORO 
i8/AC>0<FSRC 
CLR 
JSR 
.UORO 
.UORO 
.UORO 
.UORO 
.UORO 
j9/rSRC>AC>0 
CLR 
JSR 
.UORO 
.UORO 
.UORO 
.UORO 
.UORO 
;10/AC>FSRC>0 
CLR 
JSR 
.UORO 
.UORO 
.UORO 
.UORO 
.UORO 
ill/rSRC<0 
CLR 
JSR 
.UORO 
.UORO 
.UORO 
.UORO 
.UORO 

il2/AC<0 

aR 

JSR 
.UORO 
.UORO 
.UORO 
.UORO 
.UORO 



I IS/TRUNCATE TEST 



S«FLAG 
R7,0VFSUB 
77777.125252 
40300.0 
77652.070707 
7400 
7400 

8«FLAG 

R7,DVFS0B 

55377,-1 

55300.0 

40252.125252 

0 

0 

8«FLAG 

R7.0VFSUB 

64600.1 

66600.0 

36200.1 

0 

0 

8«FLAG 

R7.0VFSUB 
12345.156024 
05600.0 
44745.156024 

17 
0 

S«FLAC 

R7.0VFSUB 

40422,101010 

140511.101010 

140072,20167 

57 

50 

B«FLAC 

R7.0VFSUe 
160077,101 
40417. -l 
157651.145527 
7 

10 



CLR 
JSR 
.UORO 
.UORO 
.UORO 
.UORO 
.WORD 



9«FLAC 

R7,0VFSU8 

60100.177 

40300.0 

60000.124 

40 

40 



I NO INTERRUPT 

lOO TEST 

lACO 
iFSRC 

I RESULT 
I TEST FPS 
iRESULT FPS 

I NO INTERRUPT 

iDO TEST 

tACO 
iFSRC 
{RESULT 
I TEST FPS 
I RESULT FPS 

iNO INTERRUPT 

iOO TEST 

lACO 
iFSRC 
{RESULT 
I TEST FPS 
I RESULT FPS 

tNO INTERRUPT 

I 00 TEST 

lACO 
iFSRC 

iRESULT 
I TEST FPS 
(RESULT FPS 

iNO INTERRUPT 

I DO TEST 

lACO 
i^SRC 

{RESULT 
I TEST FPS 
{RESULT FPS 

iNO INTERRUPT 

tOO TEST 

lACO 
iFSRC 

{RESULT 
{ TEST FPS 
{RESULT FPS 

(NO INTERRUPT 

(00 TEST 

(ACO 
(FSRC 

(RESULT 
( TEST FPS 
(RESULT FPS 



SEQ n062 



GLOB Ac AREAS 
KOJllA.HAC 



MACtll 50A(1052) 
IS -MAR 84 15:51 



IS MAR -84 
T61 



16:58 PAGE 8S 
TEST Divr 



SEQ O083 



4247 








4248 








4249 


020566 


00S0S7 


001042 


4250 


020572 


004767 


000204 


4251 


020576 


060100 


000177 


4252 


020602 


040300 


000000 


4253 


020606 


060000 


000125 


4254 


020612 


000000 




4255 


020614 


000000 




4256 








4257 


020616 


012737 


000001 


4258 


020624 


004767 


000152 


4259 


020630 


177700 


000000 


4260 


020634 


000200 


000000 


4261 


020640 


137700 


000000 


4262 


020644 


001100 




4263 


020646 


101112 




4264 


020650 


000010 




4265 








4266 


020652 


012737 


000002 


4267 


020660 


004767 


000116 


4268 


020664 


000200 


000000 


4269 


020670 


177700 


000000 


4270 


020674 


000000 


000000 


4271 


020700 


041100 




4272 


020702 


041104 




4273 


020704 


000010 




4274 








4275 


020706 


012737 


000001 


4276 


020714 


004767 


000062 


4277 


020720 


100200 


000000 


4278 


020724 


040377 


177777 


4279 


020730 


100000 


000001 


4280 


020754 


002000 




4281 


020736 


102014 




4282 


020740 


000012 




4283 








4284 


020742 


012737 


000001 


4285 


020750 


004767 


000026 


4286 


020754 


030325 


025252 


428/ 


020760 


076777 


025456 


4288 


020764 


071525 


157716 


4289 


020770 


002537 




4290 


020772 


102500 




4291 


020774 


000012 




4292 








4293 








4294 


020776 


000167 


000242 


4295 








4296 








4297 








4298 








4299 








4500 








4501 








4302 









t 14 /ROUND TEST 

CLR 
JSR 
.WORD 
.WORD 
.WORD 
.UORO 
.UORD 

il5/0VERrL0W. 
MOV 
JSR 
.UORD 
.WORD 
.UORD 
.UORD 
.UORD 
.UORD 

>16/0VERFL0U. 
»10V 
JSR 
.UORD 
.WORD 
.UORD 
.WORD 
.UORO 
.WORD 

tl7/UNDERrL0U 
MOV 
JSR 
.UORO 
.UORO 
.UORD 
.UORO 
.UORO 
.UORD 

i 18/UNOERf LOU 
MOV 
JSR 
.UORO 
.UORO 
.UORO 
.UORD 
.UORO 
.WORD 

I 



S«FLAG 

Ry.DvFsue 

60100.177 
40300.0 iFSRC 
60000.125 
0 
0 

INTERRUPTS ENABLED 
♦l.SdfLAG 
R7.DvrSUB 
177700,0 
200.0 
137700.0 
1100 
101112 
10 

TRAPS DISABLED 
«2.S«FLAG 
R7.DVrSUB 
200.0 
177700.0 
0.0 
41100 
41104 
10 

, TRAPS ENABLED. UV RESULT 
«l.ft«rLAG 
R7.DvrSU8 
100200.0 



I NO INTERRUPT 

lOO TEST 

lACO 

iRESULT 
I TEST FPS 
iRESULT FPS 

I INTERRUPT 
lOO TEST 
lACO 

iFSRC 

jRESULT 
I TEST FPS 
iRESULT FPS 
iFEC 



lACO 



{RESULT 
I TEST FPS 
J RESULT FPS 
iFEC OVERFLOU 



I NO INTERRUPT 
J DO TEST 

iFSRC 



40377, -I 
100000.1 
2000 
102014 
12 

.TRAPS ENABLED. ROUND 
•l.»«FLAG 

R7.0VFSUB 
50325.25252 
76777.25456 
71525.157716 
253T 
102S00 
12 



I INTERRUPT 
tOO TEST 
lACO 
iFSRC 
iRESULT 
I TEST FPS 
iRESULT FPS 
iFEC 



I INTERRUPT 
lOO TEST 
lACO 
iFSRC 
iRESULT 
I TEST FPS 
i»«SULT FPS 
iFEC 



jnp HOPIO tGO TO NEXT TEST 

•X*X*X*X*X*X*X*X*X*X*X*X*X*X*X«X*)'*X*X*X*X*X*X*X*X*X*X*X*X 

OIVF SUBROUTINE: 

ACO 
FSRC 

FPS BEFORE EXECUTION 
FPS AFTER EXECUTION 
(FEC) 



GLOBAL AREAS 
KOJllA.MAC 



MACtll 3OA(105^) 
15 MAR 84 15:51 



15 MAR 84 

T61 



16: 



■n 



PAGE 
ST 01 VF 



84 



SEQ 0084 



4303 








4304 








4305 








4306 








4307 


021002 


012605 




4308 


021004 


012737 


021064 


4309 


021012 


012702 


000200 


4310 


021016 


170102 




4311 


021020 


010504 




4312 


021022 


062704 


000004 


4313 


021026 


172415 




4314 


021030 


016502 


000014 


4315 


021034 


170102 




4316 








4317 


021036 


174414 




4318 


021040 


170001 




4319 








4320 








4321 


021042 


032757 


000001 


4322 


021050 


001426 




4323 


021052 


104 OOO 




4324 


021054 


000545 




4325 


021056 


002015 




4326 








432/ 


021060 


000167 


000042 


4328 








4329 








4330 


021064 


052737 


OOOOOl 


4331 


021072 


001005 




4332 


021074 


104000 




4333 


021076 


000344 




4334 


021100 


002015 




4335 








4336 


021102 


000167 


000020 


4337 


021106 


012604 




4338 


021110 


005726 




4339 


021112 


022704 


021040 


4340 


021116 


001405 




4341 


021120 


104000 




4342 


021122 


000545 




4543 


021124 


002015 




4344 








4345 








4346 








4347 


021126 


170205 




4348 


021130 


012702 


000200 


4349 


021154 


170102 




4350 


021136 


012701 


001126 


4351 


021142 


174011 




4352 


021144 


026503 


000016 


4353 


021150 


001405 




4354 


021152 


104 OOO 




4355 


021154 


000546 




4356 


021156 


002015 




4357 








4358 


021160 


010504 





i 

I *x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x 

i 



000244 



DVFSUB: 


MOV 


( SP ) ♦ . R5 


■ RETURN ADDRESS TO USE AS POINTER 




MOV 


«50l,fi«fPVEC 


•REDIRECT TRAP VECTOR 




MOV 


•200, R2 


iSET TO DOUBLE MODE TOR LOAD 




Lur P5 




I A An c n c 

iLOAD ^•'S 




MOV 


R5.R4 


1 POINT TO rSRC DATA 




AOO 


•4,R4 




LOO 


(R5),AC0 


(LOAD ACO WITH TEST DATA 




MOV 


14(R5}.R2 


iGET TEST TPS 




LDFPS 


R2 


iLOAO TEST TPS 




OIVF 


(R4).AC0 


l^TEST INSTRUCTION 


It: 


SETF 




lUAIT FOR POSSIBLE FPA TRAP. 



001042 



i INSTRUCTION OIONT TRAP 

BIT •1.84FLAG 
BEQ 2« 
ERROR 

.WORD 545 
.UOftO FPPERR 



JMP 



2« 



001042 



I INSTRUCTION TRAPPED 
501: BIT •l.StfLAC 

ERROR 

.UORO 544 
.WORD rpPERf) 



51t: 



JMP 

nov 

TST 

CMP 

BEQ 

ERROR 

.UQRO 

.UORO 



2« 

(SP)..R« 

CSP>» 

•1I.R4 

2* 

S4S 

FPPERR 



J VERIFY A NO TRAP CONDITION 
i BRANCH IF GOOD 

I ALL ERRORS TO TRAP TO EMT VECTOR 
{UNIQUE ERROR NUMBER 
I ADDRESS OF ERROR MESSAGE 
{INSTRUCTION SHOULD HAVE TRAPPED 
I REJOIN CODE 



iSEE IF EXPECTING A TRAP 
(BRANCH IF EXPECTING A TRAP 
lALL ERRORS TO TRAP TO EMT VECTOR 
lUNIOUE ERROR NlfSER 
lAODRESS OF ERROR MESSAGE 
{INSTRUCTION yASNT SUPPOSE TO TRAP 
{REJOIN CODE 

{SEE IF PC - INSTRUCTION 
{CLEAN UP STACK 

!bRANCH ZF GOOD COMPARE 
(ALL ERRORS TO TRAP TO EMT VECTOR 
{UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 
(PC *IAS INCORRECT 



(COMMON COOC FOR TRAP AND NO 
2it STFPS R3 



TRAP 



51: 



MOV 
LDFPS 
MOV 
STD 
CMP 
BEQ 
ERROR 
.UORO 
.UORO 

MOV 



«200.R2 
R2 

♦RECOST.Rl 
ACO.fRl) 
16(RS),R5 
5t 

546 

FPPERR 
R5.R4 



(BAD FPS 



(SAVE FPS 

(SET FPP TO DOUBLE 

(POINT TO RECEIVED DATA TABLE 
(SAVE ACO RESULT 
(VERIFV STATUS 
(BRANCH IF GOOD 

(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 

\P0INT TO EXPECTED DATA 



GLOBA.. AREAS MACVll SOA(IOV) 15 MAR 84 16:58 PAGE 85 
KOJllA.MAC 15 riAR 04 15:51 T61 TEST OIVF 



4359 


021162 


062704 


000010 






ADD 


010.R4 
R7,DATVF'R 


4360 


021166 


004767 


160756 




41 : 


JSR 


4561 


021172 


005767 


157642 






TST 


COUNT 


4362 


021176 


001403 








BEQ 


51 


4563 


021200 


104000 








ERROR 




4564 


021202 


000347 








.WORD 


347 


4365 


021204 


002013 








.WORD 


FPPERR 


4566 
















4367 


021206 


005757 


001042 




5t; 


TST 


S^FLAG 


4568 


021212 


001002 








BNE 


6t 


4569 


021214 


000165 


000020 






JMP 


20(RS) 


4570 


021220 


170301 






6«: 


STST 


Rl 


4371 


021222 


016504 


000020 






MOV 


20(R5),R4 


4572 


021226 


020401 








CMP 


R4.R1 


4575 


021250 


001405 








BEQ 


71 


4374 


021232 


104000 








ERROR 




4575 


021234 


000350 








.UORO 


350 


4376 


021236 


002013 








.WORD 


rPPEPR 


4577 
















4578 


021240 


000165 


000022 




71: 


JMP 


22(RS) 


4579 










i 






4380 


021244 








HOPIO: 






4381 


021244 








noivO: 






4582 
















4383 










i*TEST 


62 


TEST OIVO - 


4384 
















4385 


021244 








TST62: 






4386 


021244 


005267 


157554 






INC 


•TESTN 


4387 










il/AC-FSRC-0 TRAPS 0ISA8LE0 


4388 


021250 


012757 


000002 


001042 




MOV 


•2.8«rLAG 


4389 


021256 


004767 


000516 






JSR 


R7.0V0SUB 


4390 


021262 


000000 


000000 


000000 




.WORD 


0.0.0. I 


4391 


021270 


000001 












4592 


021272 


000100 


000000 


000000 




.WORD 


100.0.0.0 


4393 


021300 


000000 










4394 


021302 


000000 


000000 


000000 




.UORO 


0.0.0. I 


4395 


021510 


000001 












4396 


021312 


040000 








.UORO 


40000 


4397 


021314 


140000 








.UORO 


140000 


4398 


021316 


000004 








.UORO 


4 


4399 










.2/rsftC 


:-0. TRAPS ENABLED 


4400 


021320 


012737 


000001 


001042 




MOV 


•1.0«FLAG 


4401 


021326 


004767 


000446 






JSR 


RT.ovosue 


4402 


021332 


000402 


000000 


000000 




.UORO 


402.0.0.0 


4403 


021340 


000000 










4404 


021342 


000000 


000000 


000000 




.UORO 


0.0.0,0 


4405 


021350 


000000 










4406 


021352 


000402 


000000 


000000 




.UORO 


402.0.0.0 


4407 


021360 


000000 










4408 


021362 


000200 








.UORO 


200 


4409 


021364 


1C0200 








.UORO 


100200 














.UORO 


4 


4411 










iS/ROUNO 




4412 


021370 


005037 


001042 






CLR 


fi«FLAG 


4415 


021574 


004767 


000400 






JSR 


RT.ovosue 


4414 


021400 


034300 


000000 


000000 




.UORO 


S4S00. 0.0.1 



iVERirr DATA 
, BRANCH IF GOOD 

I ALL ERRORS TO TRAP TO EMT VECTOR 
{UNIQUE ERROR NUMBER 
lAOORESS Of ERROR MESSAGE 

I BAD ACO 

I SEE IF NEED TO CHECK FEC 

I BRANCH IF NEED TO CHECK 

{RETURN FROM TEST 

{SAVE FEC 

iGET FEC 

iVERIFT FEC 

{BRANCH IF GOOD 

{ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
(AOORESS OF ERROR MESSAGE 
(BAO FEC 

{RETURN FROM TEST 



{INCREMENT TEST NUIfiER 

iNO INTERRUPT 
iDO TEST 



I ACO 

iFSRC 

iRESULT 

I TEST FPS 
{RESULT FPS 
iFEC 

I INTERRUPT 
lOO TEST 

tACO 
iFSRC 

iRCSOLT 

I TEST FPS 
{RESULT TPS 
iFEC 

I NO INTERRUPT 

iDO TEST 

I ACO 



L / 

GLOB At. AREAS MACUl 30 A( 1052) 15 MAR 64 16:58 PAGE 86 
KOJllA.MAC IS-MAR 84 15:51 T62 TEST DIVO 



4415 


021406 


000001 












4416 


021410 


140300 


000000 


000000 


.WORD 


140300.0.0.0 


.rsRC 


4417 


021416 


000000 












4418 


021420 


134200 


000000 


000000 


.WORD 


134200.0,0.1 


t RESULT 


4419 


021426 


000001 












4420 


021430 


000200 






.WORD 


200 


1 TEST FPS 


4421 


021432 


000210 






.WORD 


210 


1 RESULT FPS 


4422 










,4 /TRUNCATE 






4423 


021434 


005037 


001042 




CLR 


8«fLAC 


J NO INTERRUPT 


4424 


021440 


004767 


000334 




JSR 


R7.DV0SUB 


J DO TEST 


4425 


021444 


034300 


000000 


000000 


.WORD 


34300.0.0.1 


(AGO 


4426 


021452 


000001 












4427 


021454 


140300 


000000 


000000 


.WORD 


140300.0.0.0 


iFSRC 


4426 


021462 


000000 












4429 


021464 


134200 


000000 


oooooo 


.WORD 


134200.0.0.0 


1 RESULT 


4430 


021472 


000000 












4431 


021474 


000240 






.WORD 


240 


I TEST FPS 


4432 


021476 


000250 






.WORD 


250 


{RESULT FPS 


4433 










tS/ROUND NECA1IV£ AC. FSRC 




4434 


021500 


0C5037 


001042 




CLR 


04FLAG 


iNO INTERRUPT 


4435 


021504 


004767 


000270 




JSR 


R7.0VDSUB 


lOO TEST 


4436 


021510 


177642 


000000 


000000 


.WORD 


177642.0.0.151 


lACO 


4437 


021516 


000151 












4438 


021520 


166600 


000000 


oooooo 


.WORD 


166600,0.0.125 


iFSRC 


4439 


021526 


000123 












4440 


021530 


051242 


000000 


oooooo 


.WORD 


51242.0.0.0 


iRESULT 


4441 


021536 


000000 












4442 


021540 


000200 






.WORD 


200 


1 TEST FPS 


4443 


021542 


000200 






.WORD 


200 


iRESULT FPS 


4444 










: 6/ TRUNCATE NEAGTIVC AC. FSRC 




4445 


021544 


005037 


001042 




CLR 


8«FLAC 


iNO INTERRUPT 


4446 


021550 


004767 


000224 




JSR 


R7.0V0SUB 


tOO TEST 


4447 


021554 


177642 


000000 


oooooo 


.UORO 


177642.0.0. ISl 


lACO 


4448 


021562 


000151 












4449 


021564 


166600 


000000 


oooooo 


.WORD 


lM«00.0.0.t25 


iFSRC 


4450 


021572 


000123 










4451 


021574 


051241 


177777 


177777 


.WORD 


51241. I. -l.-l 


•RESULT 


4452 


021602 


177777 












4453 


021604 


000240 






.UORO 


240 


» TEST FPS 


4454 


021606 


000240 






.WORD 


240 


{RESULT FPS 


4455 










1 r/AC-FSRC 






4456 


021610 


005037 


001042 




CLR 


04CLAC 


tNO INTERRUPT 


4457 


021614 


004767 


000160 




JSR 


R7.0V0SUB tOO TEST 
S5S21. 47621. 100S5S.-1 lACO 


4458 


021620 


055521 


047621 


100333 


.UORO 


4459 


021626 


177777 












4460 


021630 


055521 


047621 


100S3S 


.UORO 


55S21.47621.1005SS.-1 tFSRC 


4461 


021636 


177777 












4462 


021640 


040200 


000000 


oooooo 


.UORO 


40200.0.0.0 


{RESULT 


4463 


021646 


000000 










4464 


021650 


007717 






.UORO 


7717 


1 TEST FPS 


4465 


021652 


007700 






.UORO 


7700 


{RESULT FPS 


4466 










i6/U>OERFcOU TRAPS ENABCeO. UV 


RESULT 


4467 


021654 


012737 


000001 


001042 


NOV 


•l.AtfLAC 


{INTERRUPT 


4468 


021662 


004767 


000112 




JSR 


R7.0V0SUB 


{00 TEST 


4469 


021666 


100200 


000000 


OOOOOO 


.UORO 


100200.0.0.0 


(ACO 


4470 


021674 


000000 













GLOBAL AREAS 
KOJllA.MAC 



MACm 50A(1052) 
15 -MAR 84 15:51 



15-MAR-e4 16:58 PAGE 87 
T62 TEST DIVD 



SEQ 0087 



4471 
44 72 
44 75 
4474 
44 75 
4476 
4477 
4478 
4479 
4480 
4481 
4482 
4485 
4484 
4485 
4486 
4487 
4488 
4489 
4490 
4491 
4492 
4495 
4494 
4495 
4496 
4497 
4498 
4499 
4500 
4501 
4502 
4503 
4504 
4505 
4506 
4507 
4508 
4509 
4510 
4511 
4512 
4513 
4514 
4515 
4516 
4517 
4518 
4519 
4520 
4521 
4522 
4525 
4524 
4525 
4526 



021676 
021704 
021706 
021714 
021716 
021720 
021722 

021724 
021732 
021736 
021744 
021746 
021754 
021756 
021764 
021766 
021770 
021772 



077777 
000000 
140400 
100201 
002200 
10?210 
000012 

012737 
004767 
077000 
000525 
000303 
14000^ 
056650 
064003 
001700 
101702 
000010 



000000 000000 
100200 100200 



000001 001042 
000042 

123465 012346 

000001 140000 

163002 103645 



.WORD 77777,0.0.0 ,FSRC 

. WORD 140400 . 100200 . 100200 . 100201 

.WORD 2200 I TEST FPS 

.WORD 102210 {RESULT FPS 

.UORO 12 iFEC 
t9/0VERFL0U TRAPS ENABLED 



;RESULT 



021774 000167 000242 



MOV 
JSR 
.WORD 

.WORD 

.WORD 

.UORO 
.UORO 
.MORO 

JMP 



♦l.iMFLAG 
R7.DV0SUB 

77000. 123465 . 12S46 , 525 



I INTERRUPT 
lOO TEST 

lACO 



303.1.140000,140001 
36650 . 163002 . IC 3645 . 64003 



iFSRC 
(RESULT 



1700 

101702 

10 



I TEST FPS 
•RESULT FPS 
iFEC 



022000 012605 

022002 012757 022062 000244 

022010 012702 000200 

022014 170102 

022016 010504 

022020 062704 000010 

022024 172415 

022026 016502 000050 

022052 170102 

022034 174414 

022056 170000 



022040 052757 000001 001042 

022O46 001426 

022050 104000 

022052 000551 

022054 002013 

022056 000167 000042 



MOPll iHOP OVER SUBROUTINE 

*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x 
*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x 

OIVO SUBROUTINE: 

ACO 
FSRC 

FPS BErORE EXECUTION 
FPS AFTER EXECUTION 
(FEC) 

*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X 
*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X 



OVOSUB: 


MOV 


(SP)».R5 


t RETURN AOORESS TO USE AS POINTER 




MOV 


•SOt.MFPVEC 


iREOIRECT TRAP VECTOR 




MOV 


•200. R2 


iSET TO DOUBLE MODE FOR LOAD 




LDFPS 


R2 


iLOAO FPS 




MOV 


ftS.R4 


(POINT TO FSRC DATA 




ADD 


•10.R4 






LOO 


(RS).ACO 


iLOAD ACO UITH TEST DATA 




MOV 


50(RS),R2 


iGET TEST FPS 


i 


LOFW 


R2 


iLOAO TEST FPS 


OIVO 


(R4).AC0 


l*TEST INSTRUCTION 


It: 


CFCC 


tUAIT FOR POSSIBLE FPA TRAP. 



I INSTRUCTION OIDNT TRAP 

BIT tl.BCfLM. 
BEG 2% 
ERROR 

.WORD 351 
.WORD FPPCRR 



JMP 



2t 



(VERIFY A NO TRAP CONDITION 
(BRANCH IF GOOD 

(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIOUC ERROR NUI^R 
(ADDRESS OF ERROR fCSSAGE 
(INSTRUCTION SHOULD HAVE TRAPPED 
(REJOIN COOE 



GLOBAL ARE MS 

KOJllA.HAC 15 MAR 84 I5:5l 



MACtU SOA(IOS^) 15 MAR 84 16:58 PAGE 88 

T62 TEST 01 VO 



4527 








> 




4528 








1 INSTRUCTION TRAPPED 


4529 


022062 


052757 


000001 001042 


50t: BIT 


*1.8«rLAG 


4550 


022070 


001005 




BNE 


51$ 


4551 


022072 


104000 




ERROR 




4552 


022074 


000552 




.WORD 


552 


4555 


022076 


002015 




.WORD 


rpPERR 


4554 












4535 


022100 


000167 


000020 


JMP 


2t 


4556 


022104 


012604 




51 »s MOV 


( SP ) ♦ . R4 


4557 


022106 


005726 




TST 


(SP)» 


4558 


022110 


022704 


022056 


CMP 


♦l».R4 


4559 


022114 


001405 




BEQ 


2« 


4540 


022116 


104000 




ERROR 




4541 


022120 


000555 




.WORD 


555 


4542 


022122 


002015 




.UORO 


FPPERR 


4545 












4544 








> 












iCOnMON CWE FOR TRAP AND 1 


4546 


022124 


170205 




ef : 5Irf5 




4547 


022126 


012702 


AAA'W\A 

000200 


nuv 


v20U«H2 


4548 


022X32 


170102 




LOrrS 


H2 


4549 


022154 


012701 


AA« • 

001126 


nov 


9HcCU5T «ff 1 


4550 


022140 


1 7401 1 




C Tf\ 


MCO # I H 1 ; 


4551 


022142 


026505 


AAAA V A 

000052 


tnr 




4552 


022146 


001405 




BEQ 


51 


4555 


022150 


104000 




CHHUR 




M r t: ^ 

•55* 


022152 


AAA VC A 

000554 




.MURU 


SS4 


•555 


022154 


002015 




■ WORD 


pPPERH 


4556 












•55 f 


022156 


010504 




5» : nuv 


K5 ,!«• 


•550 


022160 


062704 


000020 


Ann 


»cU ( «• 


A ceo 
• 559 


022164 


004767 


157756 


4t • JSR 


R7.0ATVER 


• 5oO 


022170 


005767 


156644 


TST 


COUNT 


•561 


022174 


001405 




BEQ 


St 


•5€>£ 




1 A^ AAA 

104000 




ERROR 




•5o3 


02^200 


000555 




.UORO 


555 


• JO* 




002015 




.UQRD 


FPPERR 


•505 












• JOO 


Oc2^U4 


005757 


001042 


51: TST 


A4FLAC 


• jO f 




001002 




BNE 


6% 


•5oO 


0222I2 


000165 


000054 


JMP 


5«{R5) 


•50'» 


0222IO 


170301 




61: STSr 


Rl 


• 5 » W 


02222U 


016504 


AAAA V 

000054 


MOV 


54(R5).R4 


•571 


022224 


020401 




CMP 


R4.RI 


•572 


022226 


001405 




BEQ 


7« 


•5 f O 


022230 


104000 




ERROR 




•57^ 


022252 


000556 




.UQRD 


556 


• D f 5 


(1222 34 


002013 




.UORO 


FPPERP 


• 5 r O 








•5 f f 


022236 


AAA « ^ K 

000165 


AAAAV^ 

000036 


7»: JMP 


B6(R5) 


4578 










4579 


022242 






HOPll: 




4580 


022242 






MMULP; 




4581 












4582 








t*TEST 65 


TEST MU.F 



■^EQ O088 



I SEE IF EXPECTING A TRAP 
I BRANCH IF EXPECTING A TRAP 
I ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
J ADDRESS OF ERROR MESSAGE 
{INSTRUCTION UASNT SUPPOSE TO TRAP 
iREJOIN CODE 

I SEE IF PC - INSTRUCTION 
t CLEAN UP STACK 

I BRANCH IF GOOD COMPARE 
I ALL ERRORS TO TRAP TO EMT VECTOR 
I UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 
tPC WAS INCORRECT 

TRAP 

J SAVE FPS 

I SET FPP TO DOUBLE 

(POINT TO RECEIVED DATA TABLE 
(SAVE ACO RESULT 
I VERIFY STATUS 
i BRANCH IF GOOD 

(ALL ERRORS TO TRAP TO EMT VECTOR 

t UNIQUE ERROR NUMBER 

i ADDRESS OF ERROR MESSAGE 

sBAD FPS 

iPOINT TO EXPECTED DATA 

{VERIFY DATA 
(BRANCH IF GOOD 

(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUr«ER 
(AIM)RESS OF ERROR MESSAGE 

iBAO ACO 

(SEE IF NEED TO CHECK FEC 

(BRANCH IF NEED TO CHECK 

(RETURN FROM TEST 

(SAVE FEC 

iGET FEC 

{VERIFY FEC 

(BRANCH IF GOOD 

{ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 
(BAD FEC 

{RETURN FROM TEST 



GLOBAL AREAS 
KOJllA.MAC 



MACtll 30A(1052) 
15 MAR 84 15:51 



15 MAR 84 

T63 



16:58 PAGE 89 
TEST rnjLr 



SEO n089 



*• j03 














•* jOH 


n33343 






1 3 1 : 






^ 30 J 




lA/ J4fO ' 


i DO^OO 




ITESTN 


■INCREMENT 


* jOD 










-INTERRUPTS DISABLED 




n3334i^ 




AA1 CkA 0 


n D 


8#r L AU 


iNO INTERRUPT 


A^AA 








ICQ 


Ml PCI 10 


lOO TEST 


A^AQ 






WvWA/ 




0,0 1 ACO 




UcccT>c 


AAAAAA 


AAAAAA 


urvDn 


0,0 1 r SRC 




^ j^l 




WWW 


ooonno 

VVWW 


unon 


A A 


DC CI M T 






ft07^1 7 






7< 1 7 
» 31 f 


TCCT CQC 

1 IfcST rPS 










unon 


7KAA 














INltKKUr'lb UN 








W 1 


001 04P 






iNO INTERRUPT 






AA47l^7 
W^ f 0 f 


OOOSX4 
WV 


ICQ 


07 HI r CI n 


. r\f\ TCCT 

tuU ItSI 


J ^ r 




WVt w 


000000 
www 


unon 


OAA A . ACA 


4SQA 






000000 
www 


unon 

• munu 


A A . r CD^ 








www 


000000 
www 


unon 


A A 


• DC CI II T 










unon 


1 « 


TCCT roc 
1 leal rKs 






AAOOn4 




unon 


M 


• QCCII TAKlT PDC 




















OAS037 

W.JV'J 1 


00104P 


n 0 


nan an 


. klA TftlTCDDl BT 


4604 




004767 


000S04 

WV 


ICQ 


07 Ml PCl B 


.AO TCCT 
1 UU 1 C.3 1 






000100 


000000 

www 




1 AA A I am 






wvo^^ 


000000 


unon 


«AA n .rcDf* 

0 W I U t r 9NL 




4607 




WWW 


000000 


unon 


A A 


. DC CI ■ T 






W • ^\A/ 




unon 


tow 


TCCT CDC 


4609 




On7SA4 








• OCCll TAUT CDC 


4610 








•A/Aral kPcor 


- NUUW/ 




461 1 




On^X7 
W^VO f 


001 04P 


n D 


Vwr LWj 


. kAA TklTCDOl OT 
1 NU IN 1 CKKU*' 1 


4612 




M47A7 


OO04S4 

WV^ 


ICQ 


D7 M cci n 
fi 1 •HLr 3UD 


.AA TCCT 
(DO Icsl 


4613 


OP?V^ 




000000 
www 


unon 






4614 


VCC^ f c 


04ni 77 


1 77777 


umn 


AAI 77 1 




4615 




A4ni 77 


1 77777 


unon 


AA1 77 1 


. DC Cl ■ T 


4616 




WWW 




unon 


A 
U 


TCCT CDC 


4617 




www 




unon 


A 
U 


• Dccia TAUT roc 


4618 














4619 


022406 


W Jw-J # 


001 04P 


n a 




TftlTCDOlAT 
}NU INICKNUI'I 


4620 


OPP4 1 P 


AA4 7A7 
^^^^ • 0 • 


0004P4 


ICD 




.AA TCCT 
•DO IC3I 


4621 


022416 


040177 


1 77777 






• Am 


4622 


022422 


040200 


000000 
www 




*w<nW<U iraHb 




4623 


022426 


O40177 


1 77777 


unon 


Am 97 . 1 


. DC Cl ■ T 


4624 


0PP41P 






unon 


AA 


TCCT CDC 

1 leal rfa 


4625 


022434 


000040 






AA 


.DCciM tamt roc 


4626 








lA/MnOMAI TW 






4627 


022436 




001 04P 


n o 


CkACI A/1 


• klA TMTC^OlAT 
1 NU IN 1 C <H\^ 1 


4628 


022442 


OA4 7A7 


00037A 


ICO 


Q7 Ml pcm 

nit nur >ua 


.nn TCCT 
1 UU 1 ca 1 


4629 


022446 


040100 


000000 

www 




40100.0 lACO 




4630 


0224*i2 




000000 

VA/WVA/ 


unon 


40100.0 ifSRC 




4631 


0224 S6 


0400PO 


000000 
WWW 


unon 


40020,0 


iRESULT 


4632 


022462 


OOOOIP 




unon 


12 


1 TEST FPS 


4633 


022464 


000000 




.WORD 


0 


1 RESULTANT FPS 


4634 








t7/R0UND 






4635 


022466 


005037 


001042 


CLR 


B4FLAG 


iNO INTERRUPT 


4636 


022472 


004767 


000344 


JSR 


RT.HLFSUB 


tOO TEST 


4637 


022476 


017500 


000000 


.UORO 


17S00.0 lACO 




4638 


022502 


023652 


125252 


.UORO 


25652,125252 


iFSRC 



GLOBAL AREAS 
KOJllA.MAC 



MACti; 30A(1052) 15 MAR 84 
15 MAR 84 15:51 T63 



16:58 PAGE 90 
TEST MULF 



V J ~ 




on X 1 7 7 


1 77777 
i f f # f # 




.UORO 


3177. 1 


46^0 


022512 


00741 7 






.UORO 


7417 


464 1 


022514 


007400 






.UORO 


7400 












i8/AC>0>FSRC ROUND 


4643 


022516 


OOSOX7 


00104P 




CLR 


O^LAG 


4644 


02PSPP 








JSR 


R7.MLFSUS 


4645 






177777 




.WORD 


40342. ' 1 


4646 


022532 


17654S 


025252 




!uORD 


176543.0^5252 


464 


022536 


1 76711 


06 7 324 




• WORD 


176711 .67324 


4648 


vet 


007500 






.WORD 


7500 


4649 


007510 






.WORD 


7510 


4b50 










»9/IAC«FSRC<0. 


ROUND 


4651 




005037 


001042 




CLR 


8«FLAG 


4652 




004767 


0OO264 




JSR 


R7,MLFSUB 


4653 


022556 


144600 


000000 




.WORD 


144600.0 


4654 


022562 


154000 


000000 

wwww 




.WORD 


154000.0 


4655 


022566 


060400 


000000 

www 




.WORD 


60400.0 


4656 


022572 


000017 

WW* ■ 






.UORO 


17 


4657 


022574 


000000 






.WORD 


0 


4658 










;10/AC<FSRC. ROUND 


4659 


022576 


005037 


001042 




CLR 


MFLAG 


4660 


022602 


004767 


000234 




JSR 


R7,NLFSUB 


4661 


022606 


060000 


000000 




.UORO 


60000.0 


4662 


022612 


140377 


177776 




.UORD 


140577,177776 


4663 


022616 


160177 


177776 




.UORO 


160177.177776 


4664 


022622 


000017 

WW X ■ 






.UORO 


17 


4665 


022624 


OOOOlO 






.UORO 


10 


4666 










tll/AC>0>rSRC. 


TRUNCATE 


4667 


022626 


005037 


001042 




CLR 


BCTLAG 


4668 


022632 


004767 


000204 




JSR 


R7.NLFSUB 


4669 


022636 


060000 


000000 




.UORO 


60000.0 


4670 


022642 


140377 


177776 




.UORO 


140577.177776 


4671 


022646 


160177 


177776 




.UORO 


160177.177776 


4672 


022652 


007547 






.UORO 


7547 


4673 


022654 


007550 






.UORD 


7550 


4674 










tlS/UNOERTLOU. 


NO INTERRUPTS 


4675 


022656 


012737 


000002 


001042 


NOV 


#2.8«FLAG 


4676 


022664 


004767 


000152 




JSR 


R7.NLFSue 


4677 


022670 


000200 


OOOOOl 

WWW A 




.UORO 


200.1 


4678 


022674 


000200 


OOOOOl 




.UORO 


200.1 


4679 


022700 


040200 


000002 




.UORD 


40200.2 


4680 


022704 


042117 






.UORO 


42117 


4681 


022706 


142100 






.UORO 


142100 


4692 


022710 


000012 






, UORO 


U 


4663 










il3/0VERFL0W, 


TRAP 


4664 


022712 


012737 


OOOOOl 


001042 


NOV 


•1.9«rLAG 


4685 


022720 


004767 


000116 




JSR 


R7.rtFSU8 


4686 


022724 


177777 


177777 




.UORO 


177777.-1 


4687 


022730 


040300 


000000 




.WORD 


40500.0 


4688 


022734 


100077 


177777 




.UORO 


100077.^1 


4689 


022740 


001117 






.UORO 


1117 


4690 


022742 


101116 






.UORD 


101116 


4691 


022744 


000010 






.WORD 


10 


4692 










S14/0VERFL0U NO TRAP 


4693 


022746 


012737 


000002 


001042 


NOV 


•2,S«f'LAG 


4694 


022754 


004 767 


000062 




JSR 


R7.NLFSUB 



SEQ 0090 



; RESULT 

I TEST FPS 

1 RESULTANT FPS 

iNO INTERRUPT 

lOO TEST 

lACO 
(FSRC 

iRESULT 
i TEST FPS 
I RESULTANT FPS 

I NO INTERRUPT 

iOO TEST 

lACO 

|F3RC 

•RESULT 
I TEST FPS 
« RESULT FPS 

iNO INTERRUPT 

lOO TEST 

iACO 

iFSRC 

{RESULT 
I TEST FPS 
I RESULT FPS 

I NO INTERRUPT 

I 00 TEST 

lACO 

iFSRC 

•RESULT 
I TEST FPS 
{RESULT FPS 

tNO INTERRUPT 
lOO TEST 

lACO 
iFSRC 
{RESULT 
{ TEST FPS 
{RESULT FPS 
{FEC 

{INTERRUPT 
{00 TEST 
lACO 

I FSRC 

(RESULT 
{ TEST FPS 
{RESULT FPS 
{FEC 

{NO INTERRUPT 
{00 TEST 



N7 



GLOBAL AREAS 
KDJllA.MAC 
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l6:^g^^P.AGE_9l 



riULF 



SEQ O091 



4695 


022760 


077700 


000000 


4696 


022764 


077700 


000000 


4697 


022770 


000000 


000000 


4696 


022774 


040117 




4699 


022776 


040106 




4700 


023000 


000010 




4 701 








4702 


023002 


012737 


000001 


4705 


023010 


004767 


000026 


4704 


023014 


125465 


000000 


4705 


023020 


100022 


000000 


4706 


023024 


125465 


000000 


4707 


025050 


004000 




4708 


025052 


104000 




4709 


023034 


000014 




4710 








4711 








4712 


023036 


000167 


000242 


4715 








4714 








4715 








4716 








4717 








4718 








4719 








4720 








4721 








4722 








4725 








4724 








4725 


023042 


012605 




4726 


023044 


012737 


023124 


4727 


023052 


012702 


000200 


4728 


023056 


170102 




4729 


023060 


172415 




47S0 


023062 


010504 




4731 


023064 


062704 


000004 


4732 


023070 


016502 


000014 


4733 


023074 


170102 




4734 








4735 


023076 


171014 




4736 


023100 


170001 




4737 








4738 








4739 


023102 


032737 


000001 


4740 


023110 


001426 




4741 


025112 


104000 




4742 


023114 


000557 




4743 


023116 


002013 




4744 








4745 


023120 


000167 


000042 


4746 








4747 








4748 


023124 


032737 


000001 


4749 


023132 


001005 




4750 


023134 


104000 





.UORO 
.UORD 
.UORD 
.UORD 
.UORD 
.UORD 
: 15/UNOEFZNED 
MOV 
JSR 
.WORD 
.UORD 
.UORO 
.UORD 
.UORD 
.UORO 



77700,0 

77700,0 

0.0 

40117 

40106 

10 

VARIABLE IN FSRC. 
«1.S4FLAG 
R7,MLFSUB 
125465,0 
100022.0 
125465,0 
4000 
104000 
14 



lACO 
iFSRC 
I RESULT 
, TEST FPS 
J RESULT FPS 
iFEC 

TRAP ENABLED 

; INTERRUPT 
jDO TEST 
lACO 
jFSRC 
iRESm.T 

J TEST FPS 

J RESULT FPS 

»FEC 



JHP H0P12 

*x*x*x*x*x*x*x*x*x*x*x*x*x*x«x*x«x*x*x*x*x*x*x*x*x*x*x*x*x 
•x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x 

ACO 
FSRC 

FPS BEFORE EXECUTION 
FPS AFTER EXECUTION 
(FEC) 

«x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x 
*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x«x*x*x*x*x*x*x*x*x*x*x*x 



MLFSUB: 


nov 


(SP)».R5 


1 RETURN ADDRESS TO USE AS POINTER 




nov 


•SOt.MFPVEC 


tREOXRECT TRAP VECTOR 




NOV 


♦200.R2 


tSET TO DOUBLE NODE FOR LOAD 




LOFPS 


R2 


,LOAD FPS 




LDD 


(RS).ACO 


{LOAD ACO WITH TEST DATA 




nov 


RS.R4 


i POINT TO FSRC DATA 




AOO 








NOV 


i4CR5).R2 


jGET TEST FPS 




LOFPS 


R2 


iLOAO TEST FPS 


i 


NULF 


(R«).ACO 


i*TEST INSTRUCTION 


11: 


SETF 


(UAIT FOR POSSIBLE FPA TRAP. 



I INSTRUCTION OIONT TRAP 

BIT #l.a«F(.AC 
BEQ 2t 
ERROR 

.WORD SS7 
•MORO FPPERR 



JNP 



21 



(INSTRUCTION TRAPPED 
SOI: BIT «1,B«FLAG 

BNE 51* 

ERROR 



{VERIFY A NO TRAP CONDITION 
iBRANCH IF GOOD 

I ALL ERRORS TO TRAP TO EHT VECTOR 
i UNIQUE ERROR NUNBER 
{ADDRESS OF ERROR NESSAGE 
lINSTRXTION SHOULD HAVE TRAPPED 
I REJOIN CODE 



{SEE IF EXOECTING A TRAP 

{BRANCH IF EXPECTING A TRAP 

sALL ERRORS TO TRAP TO EHT VECTOR 



GLOBAt. AREAS mCtU 30A(10S2) 
KOJllA.MAC 15-MAR-84 1S:S1 



000020 
025100 



4751 


025156 


000560 


4 752 


025140 


002015 


4 755 






4 754 


025142 


000167 


4 755 


025146 


012604 


4756 


025150 


005726 


4 757 


025152 


022704 


4758 


025156 


001405 


4 759 


025160 


104000 


4 760 


025162 


000561 


4761 


025164 


002015 


4 762 






4765 






47M 






4765 


025166 


170205 


4 766 


025170 


012702 


4767 


025174 


170102 


4 76i 


025176 


012701 


4 769 


025202 


174011 


4770 


025204 


026505 


4771 


025210 


001405 


4772 


025212 


104000 


4775 


025214 


000562 


4774 


025216 


002015 


4775 






4776 


025220 


010504 


4777 


025222 


062704 


4778 


025226 


004767 


4779 


025252 


005767 


4780 


025256 


001405 


4781 


025240 


104000 


4782 


025242 


000565 


4 785 


025244 


002015 


4 784 






4785 


025246 


005757 


4786 


025252 


001002 


4787 


0252S4 


000165 


4798 






4789 


025260 


170501 


4790 


025262 


016504 


4791 


025266 


020401 


4 792 


025270 


001405 


4795 


025272 


104000 


4794 


025274 


000564 


4795 


025276 


002015 


4796 






4 797 


025500 


000165 


4798 


025504 




4799 


025504 




4800 






4801 






4802 






4805 


025504 




4804 


025504 


005267 


4805 






4806 


025510 


005057 



15 MAR 84 
T65 



51$: 



16:58 PAGE 92 



000200 
00U26 
000016 



000010 
156676 
1S5602 



001042 
000020 

000020 



000022 



1554 74 
001042 



TEST MULF 






560 


lUNIQUE ERROR NUMBER 


.WORD 


rppERR 


1 ADDRESS Of ERROR MESSAGE 






1 INSTRUCTION UASNT SUPPOSE TO TRAP 


JHP 




iREJOIN CODE 


MOV 


( SP ) » R4 


iSEE IF PC ■ INSTRUCTION 


TST 


(SP)» 


1 CLEAN UP STACK 


CMP 


#1«.R4 


1 


BEQ 


21 


{BRANCH IF GOOD COMPARE 


ERROR 




|ALL tHHQHS TO THW TO EMT 


.WORD 


561 


1 UNIQUE ERROR NUMBER 


.WORD 


rPPERR 


lACDRESS or ERROR MESSAGE 



SEQ 0092 



I PC WAS INCORRECT 



I COMMON CODE FOR TRAP AND NO TRAP 
2»: STFPS R5 



5t; 
4*1 



5»! 



MOV 
LOFPS 
MOV 
STO 
CMP 
BEQ 
ERROR 
.WORD 
.WORD 

MOV 

ADD 

JSR 

TST 

BEQ 

ERROR 

.WORD 

.WORD 

TST 
BNE 
JMP 



I VERIFY ERROR STATUS 



•200. R2 
R2 

•RECOST.Rl 
ACO.(Rl) 
16(R5).R5 
51 

562 

FPPERR 

R5,R4 
•10. R4 

R7.0ATVFR 

COUNT 

51 

563 

FPPERR 

MTLAG 
6t 

20(R5) 



iBAO FPS 



I SAVE Fr s 

I SET FPP TO DOUBLE 

(POINT TO RECEIVED DATA TABLE 
I SAVE ACO RESULT 
iVERIFT STATUS 
I BRANCH IF GOOD 

I ALL ERRORS TO TRAP TO EMT VECTOR 
I UNIQUE ERROR NUMBER 
I ADDRESS OF ERROR MESSAGE 



I BAD ACO 



iPOINT TO EXPECTED DATA 

iVERIFT DATA 
(BRANCH IF GOOD 

(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
tAOORESS OF ERROR MESSAGE 

) 

(SEE IF NEED TO C»CCK FEC 
(BRANCH IF NEED TO C»CCK 
iRETURN FROM TEST 



61: 



STST 
MOV 
CMP 
BEQ 
ERROR 
.UORD 
.MOM) 

JMP 



71: 

M0P12: 
MMULO: 

l*TEST 64 
I 

TST64: 

INC 

il/AC-0 

CLR 



Rl 

20(R5).R4 

R4.R1 

71 

564 

FPPERR 

22(R5) 



(SAVE FEC 
iCET FEC 
(VERIFY FEC 
•BRANCH IF GOOD 

(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NLt«ER 
lAOORESS or ERROR tCSSACE 
I BAD FEC 
|RETUm« FROM TEST 



TEST MULO 



ITESTN 
a«FLAG 



(INCREMENT TEST NUMBER 
iHO INTERRUPT 



KDJllA. 



) 15 MAR 



AAA? 


wi A 


/V\A 7& 7 








ICR 


D 7 Ml rt<;i n 
lOo. 0.0.0 


"* OvO 




000100 


www 


OOOOOO 

www 




.WORD 


A A AO 
















IV/ 






1 77777 


OOOOOO 
www 




. UGRD 


411 10 1 
























www 


OOOOOO 
www 




.WORD 


0 0 0 0 




A3V<A& 










.WORD 






ft? 










200 


AMI <\ 












.WORD 


204 


'OIP 










i2/rSRC-0 




AMI 7 






W 






ClR 


oof LAG 


AO 




OOA7ft7 








JSR 


R7,MLDSUB 


AMI Q 




077777 


oooooo 

www 


OOOOOO 

www 




.WORD 


77777.0.0.0 




VC JO r C 


www 










0 0 0.0 iFSRC 






WWW 


www 


OOOOOO 
www 




.WORD 
















0.0.0.0 






www 


OOOOOO 

www 


OOOOOO 

www 




.WORD 






nOAOAO 
V\A^tfW 














n?XAi A 


A07700 








.WORD 


7700 


dM^ 




007704 








.UGRD 


7704 


AA97 










i3/AC-l 






am:>a 




AASO'^7 


00104P 






CLR 


S^LAG 






V>^* f w • 








JSR 


R7.MLDSU6 




vc 


Vfc w 


OOOOOO 

wwwv 


OOOOOO 




.WORD 


40200 .0.0.0 




APXA V; 

vc J^ Ov 


www 














APXAAn 




177777 


177777 




.WORD 


277- - 1 - - 1 . 1 


4AYK 

^ w J J 


npxAA<; 


1 77777 














flPXA^A 




1 77777 


1 77777 

X f f f r 




.WORD 


277 - 1 - 1 - 1 




APXA^ 
V/CO* JO 


1 77777 
^ f w f r f 












AAV; 




AA771 7 








.WORD 


7717 


4837 




w » ■ 








.WORD 


7700 












«4/AC>FSRC>0. 


TRUNCATE 


4639 




AA^Y7 

WiiTVw r 








CLR 




AAAO 




AAA 7^7 


OOAAOO 






JSR 




4M1 


0?3474 




OOOOOO 
www 


OOOOOO 
www 




.UORO 


65500.0.0. 1 






VW\A/A 










57577.-1.-1. 2 


4843 






1 77777 


1 77777 

4 f f r f r 




.UORO 


4MA 




1 7777<* 












4845 






1 77777 


1 77777 




.UORO 


6Mk77.-l.-l. 1 


4846 




1 77777 












4847 




AA771 7 








UORO 


7717 


4848 


OP 3526 










.MORO 


7700 


4849 














4850 


0P3530 




A01 A4P 






aR 


S#FLAG 


4851 


023534 




wv^*^^ 






JSR 


R7.ML0SU6 


4852 




137577 


177777 


177777 




.UORO 


XS7577. -I. 1. 2 


4853 




I7777fc 












4854 


0?SS5O 


1#^SAOO 


www 


OOOOOO 
www 




• UORO 


165400.0.0. I 


4855 


023556 


WWV A 












4856 




o^^ooo 


OOOOOO 


OOOOOO 
www 




.UORO 


65OO0.0.0 0 


4857 




www 












4858 


023570 


007717 








.M)RO 


7717 


4859 


023572 


007700 








.UORO 


7700 


4860 










i6/AC>FS*»C»0 




4861 


023574 


005057 


001042 






CLR 


S4FLAG 


4862 


023600 


004767 


000270 






JSR 


R7.rt.0SUB 



S£Q O093 

iOO TEST 



ACQ 

F5RC 

RESULT 

TEST FPS 
RESULTANT FPS 

NO INTERRUPT 

iDO TEST 

ACO 



RESJLT 

TEST FPS 
RESULTANT FPS 

NO INTERRUPT 

•DO TEST 

ACO 
FSRC 

{RESULT 

TEST FPS 
RESULTANT FPS 

NO INTERRUPT 

iDO TEST 

ACO 
FSRC 

iRESaT 

TEST FPS 
RESULTANT FPS 

HO INTERRUPT 

I 00 TEST 

ACO 
FSRC 

•RESULT 

TEST FPS 
RESULTANT FPS 

iNO INTERRUPT 

lOO TEST 



GLOBAL 


AREAS 


KOJllA.NAC 


4863 


023604 


4664 


023612 


4865 


023614 


4866 


023622 


4867 


023624 


4868 


023632 


4869 


023634 


4870 


023636 


4871 




4872 


023640 


4873 


02S644 


4874 


023650 


487«; 


023656 


487t 


023660 


4877 


023666 


4878 


023670 


4879 


023676 


4680 


023700 


4881 


023702 


4662 




466S 


023704 


4684 


023712 


4885 


023716 


4886 


023724 


4867 


023726 


4866 


023734 


4869 


023736 


4890 


023744 


4691 


023746 


4892 


023750 


4893 


023752 


4894 




4895 


023754 


4896 


023760 


4897 


023764 


4896 


023772 


4899 


023774 


4900 


024002 


4901 


024004 


4902 


024012 


4903 


024014 


4904 


024016 


4905 




4906 


024020 


4907 


024026 


4906 


024032 


4909 


024040 


4910 


024042 


4911 


024050 


4912 


024052 


4913 


024060 


4914 


024062 


4915 


024064 


4916 


024066 


4917 




4918 





15 



IS MAR 



SEQ 0094 



017500 
000000 
123652 
125252 
103177 
177777 
000200 
000210 

005037 
004767 
000300 
000252 
000377 
000003 
000000 
000000 
005740 
005744 

012737 
004767 
100277 
177777 
100300 
000001 
040417 
000000 
002217 
102200 
000012 

005037 
004767 
177777 
177777 
040200 
177777 
000000 
000000 
006740 
006746 

012737 
004767 
157700 
025252 
167700 
000000 
007420 
117777 
001240 
101242 
000010 



000000 000000 
125252 125252 
177777 177777 



001042 
000224 

000000 000000 

00000 1 000002 
000000 000000 



000001 001042 
000156 

000001 000002 

000001 000001 

040001 077403 



001042 
000110 

177777 177777 
177777 177777 
000000 000000 



000001 001042 
000042 

025252 025252 

000000 000000 

017777 117777 



.UORO 17500.0,0.0 lACO 

.UORO 123652.125252.125252.125252 iTSRC 

.UORO 103177, I. I. 1 iHESULT 



.UORD 200 
.WORD 210 
i7/UN0ERFL0U, TRAPS DISABLED 



I TEST TPS 
♦RESULTANT TPS 



CLR 
JSR 
.UORD 

.WORD 

.UORD 

.UORD 
.UORO 



BOFLAG 
R7.ML0SU8 
300.0.0,252 

377,1.2.3 

0.0.0.0 

5740 
5744 



iNO INTERRUPT 
»D0 TEST 
tACO 

iFSRC 



i8/UNDERrL0U. TRAP ENABLED 



I RESULT 

» TEST TPS 
I RESULT FPS 



MOV 
JSR 
.UORO 

.UORO 

.UORD 

. UORO 
. UORO 
.UORD 



•l.B«FLAC 

R7.tiLDSUB 
100277.1.2. 1 

100300.1,1.1 

40417.40001.77403.0 



I INTERRUPT 
iDO TEST 
lACO 



iFSRC 



iRESaT 



2217 
102200 
12 



t9/0VCRf'L0U. TRAPS DISABLED 
CLR B«FLAG 

JSR R7.t«.osue 

.UORO -1.-1. -1.-1 

.WORD 40200. l.-l.l 

.UORO 0.0.0.0 

.UORO 6740 
.UORO 6746 
ilO/OVERTLOU. TRAPS ENABLED 



» TEST FPS 
{RESULT rPS 
I FCC 



I NO INTERRUPT 
lOO TEST 
|ACO 

tFSRC 



•RESULT 

I TEST TPS 
iRESULT FPS 



HOV 
JSR 
.UORO 

.UORO 

.UORO 

.UORO 
.UORO 
.UORO 



•1.84FLAG 

R7.f«.0SgS 



•INTERRUPT 
lOO TEST 



157700. 252S2 .252S2.2S2S2 
167700.0.0.0 iFSRC 
7420,017777.117777.117777 



lACO 



iRESULT 



1240 

101242 

10 



I TEST FPS 
iRESULT FPS 
iFEC 



E8 



GLOBAt. AREAS 
KOJllA.nAC 



MAC>11 S0A(10S2) 
15 -MAR S4 15:bl 



15 -MAR 84 
T64 



16:58 PAGE 95 
TCST MULO 



SEQ 0095 



4919 
4950 
4921 
4925 
495S 
4924 
4925 
4926 
4927 
4928 
4929 
4950 
4931 
4932 
4933 
4934 
4935 
4936 
4937 
4938 
4939 
4940 
4941 
4942 
4943 
4944 
4945 
4946 
4947 
4948 
4949 
4950 
4951 
4952 
4953 
4954 
4955 
4956 
4957 
4958 
4959 
4960 
4961 
4962 
4963 
4964 
4965 
4966 
4967 
4968 
4969 
4970 
4971 
4972 
4973 
4974 



024070 000167 000242 



JMP 



HOP 15 



024074 
024076 
024104 
024110 
024112 
024114 
024116 
024122 
024126 

024130 
024132 



024134 
024142 
024144 
024146 
024150 



012605 
012737 
012702 
170102 
172415 
010501 
062701 
016502 
170102 

171011 
170011 



032737 
001426 
104000 
000S6S 
002013 



024152 000167 



024156 
024164 
024166 
024170 
024172 

024174 
024200 
024202 
024204 
024210 
024212 
024214 
024216 



024220 
024222 



032757 
001005 
104000 
000566 
002015 

000167 
012604 
005726 
022704 
001405 
104000 
000567 
002015 



170203 
012702 



•x*x*x*x*x*x«x*x*x«x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x 

«X*X*X*X*X4>X*X*X«X*X*r*X*X*X'>X«X*X*X*X*X«X*X*X*X*X*X*X*X*X 

ACO 

rsRC 

F-PS BEFORE EXECUTION 
TPS AFTER EXECUTION 
(FEC) 

«X«X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X 
•X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X«X«X«X 



024156 000244 
000200 



000010 
000050 



MLOSUB: 


MOV 


(SP)«.R5 


1 RETURN ADDRESS TO USE AS POINTER 




MOV 


«SOt.0«FPVEC 


1 REDIRECT TRAP VECTOR 




MOV 


•200. R2 


iSET TO DOUBLE MODE FOR LOAD 




LDFPS 


R2 


iLOAD FPS 




LDO 


(R5).AC0 


ILOAO ACO UITH TEST DATA 




MOV 


R5.R1 


(POINT TO FSRC DATA 




ADD 


•10. Rl 






MOV 


50(R5).R2 


|G£T TEST FPS 




LDFPS 


R2 


iLOAD TEST FPS 


1 


MULO 


(Rl).ACO 


l*TEST INSTRUCTION 


It: 


SETD 




iWAir FOR POSSIBLE FPA TRAP. 



000001 001042 
000042 

000001 001042 

000020 
024132 



•INSTRUCTION DIDNT TRAP 

BIT •1.0«FLAG 
BEO 2t 
ERROR 

.WORD 365 
.UORO FPf»ERR 



tVERIFr A NO TRAP CONDITION 
I BRANCH IF GOOD 

I ALL ERRORS TO TRAP TO EHT VECTOR 
(UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 
(INSTRUCTION SHOULD HAVE TRAPPED 



000200 





JMP 


2« 


(REJOIN CODE 


(INSTRUCTION TRAPPED 




sot: 


BIT 


•l.MFLAG 


(SEE IF EXPECTING A TRAP 




BNE 


Sit 


(BRANCH IF EXPECTING A TRAP 




ERROR 




(ALL ERRORS TO TRAP TO EMT VECTOR 




.WORD 


366 


(UNIQUE ERROR NUMBER 




.WORD 


FPPERR 


(AODRESi OF ERROR MESSAGE 








(INSTRUCTION UASNT SUPPOSE TO TRAP 




JMP 


2t 


(REJOIN CODE 


511: 


MOV 


(SP)».R4 


(SEE IF PC • INSTRUCTION 




TST 


(SP)^ 


(CLEAN UP STACK 




CMP 


•ll,R4 






BEQ 


2t 


1 BRANCH IF GOOD COMPARE 




ERROR 




(ALL ERRORS TO TRAP TO EMT VECTOR 




.WORD 


S67 


(UNIQUE ERROR NUMBER 




.UORD 


FPPERR 


(ADDRESS OF ERROR MESSAGE 








(PC WAS INCORRECT 


(COMMON CODE FOR TRAP AND NO 


TRAP 


2t: 


STFPS 


R5 


(SAVE FPS 




MOV 


•200. R2 


(SET fPP TO DOUBLE 



GLOeAL AREAS MAC^ll 50A(1052) 
KOJllA.MAC IS MAR -84 IS: Si 



F8 



4975 


024226 


170102 




4976 


024230 


O12701 


001126 


4977 


024234 


174011 




4978 


024236 


026503 


000032 


4979 


024242 


001403 




4980 


024244 


104000 




4981 


024246 


000370 




4982 


024250 


002013 




4983 








4984 


024252 


010504 




4985 


024254 


062704 


000020 


4986 


024260 


0O4767 


155662 


4987 


024264 


005767 


154550 


4988 


024270 


001403 




4989 


024272 


104000 




4990 


024274 


000371 




4991 


024276 


002C1S 




4992 








4993 


024300 


005737 


001042 


4994 


024304 


001002 




4995 


024306 


000165 


000034 


4996 








4997 


024312 


170301 




4998 


024314 


016504 


000034 


4999 


024320 


020401 




5000 


024322 


001403 




5001 


024324 


104000 




5002 


024326 


000372 




5003 


024330 


002013 




5004 








5005 


024332 


000165 


000036 


5006 


024336 






5007 


024336 






5008 








5009 








5010 








5011 


024336 






5012 


024336 


005267 


154442 


5013 








5014 


024342 


005037 


001042 


5015 


024346 


004767 


000554 


5016 


024352 


000100 


000000 


5017 


024356 


012346 


177777 


5018 


024362 


000000 


000000 


5019 


024366 


000000 


000000 


5020 


024372 


000013 




5021 


024374 


000004 




5022 








5023 


024376 


005037 


001042 


5024 


024402 


004767 


000520 


5025 


024406 


012356 


177777 


5026 


024412 


000000 


000000 


5027 


024416 


000000 


000000 


5028 


024422 


000000 


000000 


5029 


024426 


0O0003 




5050 


024430 


000004 





15-MAR 84 
164 



16: 



3t: 
41: 



51: 



6t: 



7»; 

M0PI5: 
WMOOF: 
I 

I •TEST 
»••**•< 

TST65: 



?lsT'^fi8Eo^* 






LDFPS 


R2 






hOV 


•RECDST.Rl 


1 POINT TO RECEIVED DATA TABLE 


STO 


ACO.(Rl) 


iSAVE ACO RESULT 




CMP 


S2(R5) RS 


iVERIFY STATUS 




BEQ 


3t 


(BRANCH IF GOOD 




ERROR 




lALL ERRORS TO TRAP TO EMT 


VECTOR 


.UORD 


370 


iUNIQUE ERROR NUMBER 




!u0RD 


FPPERR 


J ADDRESS OF ERROR MESSAGE 








iBAO FPS 




HOV 


R5.R4 


1 POINT TO EXPECTED DATA 




ADD 


*20 , R4 






JSR 


R7,DATVER 


J VERIFY DATA 




TST 


COUNT 






BEQ 


5) 


1 BRANCH IF GOOD 




ERROR 




lALL ERRORS TO TRAP TO EMT 


VECTOR 


.WORD 


371 


t UNIQUE ERROR NUMBER 




.UORO 


FPPERR 


t ADDRESS OF ERROR MESSAGE 








tBAD ACO 




TST 


B^fLAG 


iSEE IF NEED TO CHECK FEC 




BNE 


61 


(BRANCH IF NEED TO CHECK 




JMP 


S4(R5) 


(RETURN FROM TEST 




ERROR 


STATUS 






STST 


Rl 


(SAVE FEC 




nov 


34(R5).R4 


(GET FEC 




CMP 


R4.R1 


(VERIFY FEC 




BEQ 


7$ 


(BRANCH IF GOOD 




ERROR 




(«.L ERRORS TO TRAP TO EMT 


VECTOR 


.WORD 


S72 


(UNIQUE ERROR NUMBER 




.UORO 


FPPERR 


( ADDRESS OF ERROR MESSAGE 








(BAD FEC 




JMP 


S6(RS) 


(RETURN FROM TEST 





SEQ 0096 



65 



TEST MODF 



ll/AC-0 



INC 


ITESTN 


lINC^MENT 


FSRC-O 




CLR 


S«FLAC 


(NO INTERRUPT 


JSR 


R7.Morsue 


lOO TEST 


.WORD 


lOO.O lACO 




.WORD 


12S46.-1 


iFSRC 


.WORD 


0.0 


1 FRACTIONAL RESULT 


.WORD 


0.0 


{INTEGER RESULT 


.WORD 


15 


1 TEST FPS 


.UORD 


4 


•RESULTANT FPS 


0 

CLR 


e#FLAG 


(NO INTERRUPT 


JSR 


R7.M0FSU8 


lOO TEST 


.WORD 


12356. 1 


lACO 


.WORD 


0.0 iFSRC 




.WORD 


0.0 


(FRACTIONAL RESULT 


.WORD 


0.0 


(INTEGER RESULT 


.WORD 


3 


( TEST FPS 


.WORD 


4 (RESULTANT FPS 



uLUtSML 

KOJllA. 


ADC AC 

• MAC 


H4C til 
15 MAR M 




5051 








5032 


024452 


005057 


001042 


5035 


024456 


004767 


000464 


5054 


024442 


000000 


000000 


5035 


024446 


177777 


177777 


5056 


024452 


000000 


000000 


5037 


024456 


000000 


000000 


5058 


024462 


007500 




5039 


024464 


007S04 




5040 








5041 


024466 


005057 


001042 


5042 


024472 


004767 


000450 


5045 


024476 


046252 


125252 


5044 


024502 


040500 


000000 


5045 


024506 


000000 


000000 


5046 


024512 


046577 


177777 


5047 


024516 


000013 




5048 


024520 


000004 




504<» 








5050 


024522 


005037 


001042 


5051 


024526 


004767 


000574 


5052 


024532 


077652 


125252 


5055 


024556 


040300 


000000 


5054 


024542 


000000 


000000 


5055 


024546 


077777 


177777 


50S6 


024552 


000000 




5057 


024554 


000004 




5058 








5059 








5060 


024556 


005037 


001042 


5061 


024562 


004767 


000340 


5062 


024566 


060600 


000000 


5063 


024572 


147400 


025700 


5064 


024576 


000000 


000000 


5065 


024602 


170000 


025700 




024606 


007400 




5067 


024610 


007404 




5066 








5069 


024612 


005037 


001042 


5070 


024616 


004767 


000304 


5071 


024622 


100227 


177777 


5072 


024626 


044025 


02S252 


5075 


024632 


104061 


021251 


5074 


024636 


000000 


000000 


5075 


024642 


000000 




5076 


024644 


000010 




5077 








5078 


024646 


005057 


001042 


5079 


024652 


004767 


000250 


5080 


024656 


046252 


125252 


5081 


024662 


040500 


000000 


5082 


024666 


000000 


000000 


5083 


024672 


046577 


177777 


5084 


024676 


000055 




5085 


024700 


000044 




5086 









bc5 

15MAR^|| l6:^g^^P^g|^97 



i3/AC-0 



CLR 


MFLAG 


JSR 


R7, MOT SUB 


. UORO 


0,0 


.UORO 


1. -I 


. UORO 


0,0 


.UORO 


0,0 


.WORD 


7500 


.WORD 


7504 


j4/AC>r ShC>0 




CLR 


B*r LAG 


JSR 


R7 ,nDr SUB 


.WORD 


46252 . 125252 


.WORD 


AAV/\y\ t\ c*pn/* 

40300 tO ir ShC 


.WORD 


0,0 


.WORD 


46377, -I 


.WORD 


15 


.WORD 


4 


l5/AC>rSRC>0 




CLR 


B4f LAG 


JSR 


R 7 a no* SUP 


.WORD 


77652. 12S2S2 


.WORD 


40500.0 iTSRC 




V . V 


.WORD 


77777.-1 


.WORD 


0 


.UORD 


4 


|6/AC>0<FSRC. 


INTEGERS 



CLR 


MfLAC 


JSR 


R7.nDFSUB 


.UORO 


60600.0 


.UORO 


147400.25700 


.UORO 


0.0 


.UORO 


170000.25700 


.UORO 


7400 


.UORO 


7404 


i7/AC<0<rSRC. 


FRACTIONAL 


CLR 


••FLAG 


JSR 


R7.HDFSUB 


.UORO 


100227, 1 


.UORO 


44025.25252 


.UORO 


104061,21251 


.UORO 


0.0 


.UORD 


0 


.UORO 


10 


i8/AC«0>rSRC. 


TRUNCATE 


CLR 


0*FLAG 


JSR 


R7.H0FSU8 


.UORO 


46252.125252 


.UORO 


40300,0 


.UORD 


0.0 


.UORD 


46377.- I 


.UORO 


53 


.WORD 


44 



19/ROUNO INTEGER 



SEQ 0097 



I NO INTERRUPT 

I 00 TEST 

I AGO 
:FSRC 

iFRACTIONAL RESULT 
I INTEGER RESULT 
I TEST TPS 
iRESULT FPS 

I NO INTERRUPT 

iDO TEST 

lACO 

I FRACTIONAL RESULT 

J INTEGER RESULT 
I TEST FPS 
•RESULTANT FPS 

I NO INTERRUPT 

I 00 TEST 

tACO 

iFRACTIONAL RESULT 

I INTEGER RESULT 
I TEST FPS 
I RESULTANT FPS 



iNO INTERRUPT 

lOO TEST 

:ACO 

iFSRC 
•FRACTIONAL RESULT 

t INTEGER RESULT 
t TEST FPS 
•RESULT FPS 

iNO INTERRUPT 

»00 TEST 

lACO 

iFSRC 

J FRACTIONAL RESULT 
I INTEGER RESULT 
I TEST FPS 
(RESULT FPS 

iNO IMTERRUPT 

iDO TEST 
lACO 

iFSRC 

iFRACTIONAL RESULT 

(INTEGER RESULT 
( TEST FPS 
(RESULT FPS 



bLOBAi. AREAS 
KDJllA.HAC 



MAC til 30A(105i) 
15 MAR 04 15:51 



lb HAR^gl 



16 



ST MODF 



5087 
5088 
5089 
5090 
5091 
5092 
5093 
5094 
5095 
5096 
5097 
5098 
5099 
5100 
5101 
5102 
5105 
5104 
5105 
5106 
5107 
5108 
5109 
5110 
5111 
5112 
5113 
5114 
5115 
5116 
5117 
5118 
5119 
5120 
5121 
5122 
5123 
5124 
5125 
5126 
5127 
5128 
5129 
5130 
5131 
5152 
5135 
5154 
5155 
5156 
5157 
5158 
5159 
5140 
5141 
5142 



024702 
024706 
024712 
024716 
024722 
024 726 
024752 
024754 

024756 
024742 
024746 
024 752 
024756 
024762 
024766 
024770 

024772 
024776 
025002 
025006 
025012 
025016 
025022 
025024 

025026 
025052 
025036 
025042 
025046 
025052 
025056 
025060 

025062 
025070 
025074 
025100 
025104 
02511C 
025114 
025116 
025120 



005057 
004767 
046252 
040500 
OOOOOO 
046577 
000015 
000004 

005057 
004767 
040777 
040200 
040177 
040740 
OOOOOO 
OOOOOO 

005057 
004767 
OOOOOO 
OOOOOO 
OOOOOO 
OOOOOO 
OOOOOO 
000004 

005057 
004767 
040225 
066652 
OOOOOO 
066707 
007027 
007004 

012757 
004767 
076000 
076000 
OOOOOO 
055600 
001000 
101006 
000010 



001042 
000214 

12525? 
OOOOOO 
OOOOOO 
177777 



001042 
000160 
177777 
OOOOOO 
177770 
OOOOOO 



001042 
000124 
OOOOOO 
OOOOOO 
OOOOOO 
OOOOOO 



001042 
000070 
125252 
052525 
OOOOOO 
025160 



000001 001042 

000052 

OOOOOO 

OOOOOO 

OOOOOO 

OOOOOO 



CLR 8«fLAG 

JSR R7.M0FSUB 

.WORD 46252.125252 

.WORD 40300.0 

.WORD 0.0 

.UORO 46577. 1 

.UORO 13 

.WORD 4 
(10/ TRUNCATE FRACTION 

CLR fi«FLAG 

JSR R7,M0FSUB 

.WORD 40777. -1 

.UORO 40200.0 

.WORD 40177.177770 

.WORD 40740.0 

.WORD 0 

.WORD 0 



tll/ROUNO INTEGER 



CLR 
JSR 
.UORO 
.UORO 
.UORO 
.UORO 
.UORO 
.UORO 



B«rLAG 

R7.M0rSUB 

0.0 

0,0 

0.0 

0.0 

0 

4 



tl2/R0UND FRACTION 



025122 000167 000510 



aR 

JSR 
.UORO 
.UORO 
.UORO 
.UORO 
.UORO 
.UORO 
I /OVERFLOW 
MOV 
JSR 
.UORO 
.UORO 
.UORO 
.UORO 
.UOM) 
.UORO 
.UORO 

I 

JHP 



MFLAG 
R7.M0FSU8 
40225.125252 
66652.52525 
0.0 

66707.25160 

7027 

7004 

41. MFLAG 

R7.M0FSUe 

76000.0 

76000.0 

0.0 

33600.0 
1000 
101006 
10 

M0P14 



■NO INTERRUPT 

(00 TEST 
lACO 

iFSRC 

I FRACTIONAL RESULT 

(INTEGER RESULT 
( TEST FPS 
(RESULT FPS 



jNO INTERRUPT 

(00 TEST 
(ACO 

(FSRC 

(FRACTIONAL 
(INTEGER RESULT 
( TEST FPS 
(RESULT FPS 



RESULT 



(NO INTERRUPT 

(00 TEST 

(ACO 
(FSRC 

(FRACTIONAL RESULT 
(INTEGER RESULT 
; TEST FPS 
(RESULT FPS 

(NO INTERRUPT 

J 00 TEST 

(ACO 

(FSRC 

(FRACTIONAL RESULT 

(INTEGER RESULT 
( TEST FPS 
(RESULT FPS 

( INTERRUPT 
(00 TEST 

(ACO 
(FSRC 

(FRACTIONAL RESULT 
(INTEGER RESULT 
( TEST FPS 
(RESULT FPS 
(FEC 



;*X*X*X*X*X*X*X*X«X*K«X*)(*X*X*X*X*X*X*X*X*X*X«X*X*X*X*X*X*X 

*x*x*x«x*x*x*x«x*x«x*x«x«x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x 

ACO 
FSRC 

FRACTIONAL RESULT 

INTEGER RESULT 

FPS BEFORE EXECUTION 



ULOBAi ARFAS 
KOJllA.MAC 



5145 

5144 

5145 

5146 

514 7 

514S 

5149 

5150 

5151 

5152 

5153 

5154 

5155 

5156 

5157 

5158 

5159 

5160 

5161 

5162 

5163 

5164 

5165 

5166 

5167 

5166 

5169 

5170 

5171 

5172 

5173 

5174 

5175 

5176 

5177 

5178 

5179 

5180 

5181 

5182 

5183 

5184 

5185 

5186 

5187 

5188 

5189 

5190 

5191 

5192 

5193 

5194 

5195 

5196 

5197 

5198 



lb 



HACUl 50A(1052) 
IS MAR -84 15:51 



15 HAR 84 
T6S 



16:58 PACE 99 
TEST MOOT 



SEQ O09<* 



025126 
025)30 
025136 
025142 
025144 
025146 
025152 
025154 
025156 
025162 
025166 

025170 
025172 



025174 

025202 
025204 
025206 
025210 



012605 
012737 
012702 
170102 
172415 
012701 
172511 
010501 
062701 
016502 
170102 

171411 
170001 



032737 
001426 
104000 
000373 
002013 



FPS AFTER EXECUTION 
(FEC) 



*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x 



025216 000244 
000200 



025426 



000004 
000020 



nOFSUB: 


MOV 


(SP)».R5 




MOV 


•50l.fi«FPVEC 




MOU 


•200. R2 




LDFPS 


R2 




LOO 


(RS).ACO 




MOV 


•HOOGAR.Rl 




LOD 


(Rl).ACl 




MOV 


R5.R1 




ADO 


♦4.R1 




MOV 


20(RS).R2 


i 


LOFPS 


R2 


MOOT 


(Rl).ACO 


1»: 


SETF 



000001 001042 



(INSTRUCTION OIDNT TRAP 

BIT •l.MFLAC 
BEQ 2t 
ERROR 

.UORO S7S 
.WORD rPPERR 



025212 000167 000042 



025216 
025224 
025226 
025230 
025232 

025234 
025240 
025242 
02S244 
025250 
025252 
025254 
02S2S6 



025260 
025263 
025266 
025270 



JMP 



2t 



J INSTRUCTION TRAPPED 



032737 


000001 001042 50>: 


BIT 


•1.04FLAG 


001005 




BNE 


51 » 


104000 




ERROR 




000374 




.UORO 


374 


002013 




.WORD 


FPPERR 


000167 


000020 


JMP 


2t 


012604 




MOV 


(SP)»,R4 


005726 




TST 


(SP)» 


022704 


025172 


CMP 


*1I.R4 


001403 




BEQ 


2t 


104000 




ERROR 




000375 




.WORD 


575 


002013 




.UORO 


FPPERR 



I RETURN ADDRESS TO USE AS POINTER 
(REDIRECT TRAP VECTOR 
(SET TO DOUBLE MODE FOR LOAD 
(LOAD FPS 

(LOAD ACO WITH TEST DATA 
(LOAD KNOWN INTO ACl 

(POINT TO FSRC DATA 

iCET TEST FPS 
(LOAD TEST FPS 

(•TEST INSTRUCTION 

(WAIT rOR POSSIBLE FPA TRAP. 



(VERIFY A NO TRAP CONDITION 
(BRANCH IF GOOD 

(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUr«ER 
(ADDRESS OF ERROR MESSAGE 
(INSTRUCTION SHOULD HAVE TRAPPED 
(REJOIN CODE 



(SEE IF EXPECTING A TRAP 
(BRANCH IF EXPECTING A TRAP 
(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR rcSSAGE 
(INSTRUCTION UASNT SUPPOSE TO TRAP 
(REJOIN CODE 

(SEE IF PC - INSTRUCTION 
(CLEAN UP STACK 

! BRANCH IF GOOD COMPARE 
(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 
(PC WAS INCORRECT 



025274 
025276 
025302 



170203 
012702 
170102 
012701 

174011 
026503 
001403 



000200 
001126 

000022 



(COMMON CODE FOR TRAP AND NO 
21 : STFPS R5 

MOV 4200, R2 

LOFPS R2 

MOV «REC0ST.R1 
iSAVE FRACTIONAL RESULT 

STD ACO. CRD 

CMP 22( R5}.R3 

BEQ 5« 



TRAP 



(SAVE FPS 

iSET FPP TO DOUBLE 

(POINT TO RECEIVED DATA TABLE 

(SAVE ACO RESULT 
(VERIFY STATUS 
(BRANCH IF GOOD 



Jo 

uLOBAi AREAS MAC* 11 30AC105*?) 15 MAR 84 16!58 PACE 100 SEQ OlOO 

KDJllA.HAC 15-MAR 64 15:51 T65 TEST MQOF 



5199 


025504 


104000 






ERROR 






lALL ERRORS TO TRAP TO EMT 


VECTOR 


5200 


025306 


000376 






.WORD 


376 




1 UNIQUE ERROR NUMBER 




5201 


025310 


002013 






.WORD 


FPPERR 




(ADDRESS OF ERROR MESSAGE 




5202 
















iBAO FPS 




5205 


025512 


010504 






3*! MOV 


R5.R4 




iPOINT TO EXPECTED DATA 




5204 


025314 


062704 


000010 




ADD 


«10.R4 








5205 


025320 


004767 


154604 




4$: JSR 


R7.DATVFR 




1 VERIFY DATA 




5206 


025324 


005767 


155510 




TST 


COUNT 








5207 


025550 


001405 






BEQ 


5t 




(BRANCH IF GOOD 




5208 


025552 


104000 






ERROR 






(ALL ERRORS TO TRAP TO EMT 


VECTOR 


5209 


025554 


000577 






.WORD 


577 




(UNIQUE ERROR NUMBER 




5210 


025556 


002015 






.WORD 


FPPERR 




{ADDRESS OF ERROR MESSAGE 




5211 
















tBAD ACO 




5212 










tSAVE INTEGER 


RESULT 








5215 


025540 


174111 






5»: STO 


AC1,(R1) 




(SAVE ACl RESiJLT 




5214 


025542 


010504 






nov 


R5,R4 




(POINT TO EXPECTED 




5215 


025544 


062704 


000014 




ADO 


•14, R4 








5216 


025550 


004767 


154554 




JSR 


R7,0ATVFR 




(VERIFY DATA 




5217 


025354 


005767 


153460 




TST 


COUNT 




i 




5218 


025560 


001405 






BEQ 


61 




(BRANCH IF GOOD 




5219 


025562 


104000 






ERROR 






(ALL ERRORS TO TRAP TO EMT 


VECTOR 


5220 


025364 


000400 






.WORD 


400 




(UNIQUE ERROR NUMBER 




5221 


025366 


002013 






.UORO 


FPPERR 




(ADDRESS OF ERROR tCSSAGE 




5222 
















iBAO ACl 




5225 


025370 


005757 


001042 




6»; TST 


S#FLAG 




(SEE IF NEED TO Ck€CK FEC 




5224 


025374 


001002 






BNE 


7$ 




(BRANCH IF NEED TO CKCK 




5225 


025576 


000165 


000024 




JUP 


24tR5) 




(RETURN fROM TEST 




5226 


025402 


170501 






7$: STST 


Rl 




iSAVE FEC 




5227 


025404 


016504 


000024 




MOV 


24(R5),R4 




iCET FEC 




5228 


025410 


020401 






CMP 


R4,R1 




( VERIFY FEC 




5229 


025412 


001405 






BEQ 


6* 




(BRANCH IF GOOD 




5250 


025414 


104000 






ERROR 






(ALL ERRORS TO TRAP TO EMT 


VECTOR 


5251 


025416 


000401 






.WORD 


401 




] UNIQUE ERROR NUr^R 




5252 


025420 


002015 






.WORD 


FPPERR 




(ADDRESS OF ERROR MESSAGE 




5253 
















iBAO FEC 




5254 


025422 


000165 


000026 




8$ : JMP 


26(R5) 




iRETURN FROM TEST 




5255 










i 








5256 


025426 


177777 


177777 


177777 


MOOGAR: .WORD 


-I. -I. -I, • 


1 


tKNOlM DATA FOR ACl 




5257 


025454 


177777 














5238 


025456 








MOPUs 










5259 




















5240 


025456 


















5241 




















5242 










l*TEST 66 


TEST WOO 








5245 




















5244 


025456 








TST66: 










5245 


025436 


005267 


153342 




ZNC 


• TtSTN 




lIHCRCHENi TEST NUMBER 




5246 










il/AC>FSRC"0 










5247 


025442 


005057 


001042 




CLR 


••FLAG 




iNO INTERRUPT 




5248 


025446 


004767 


001164 




JSR 


RT.HOOSUB 
12S45. -l. • 




iDO TEST 




5249 


025452 


012545 


177777 


177777 


.UORO 


I, -v 


|ACO 




5250 


025460 


177777 














5251 


025462 


000100 


000000 


000000 


.WORD 


100.0.0,0 




iFSRC 




5252 


0254 70 


000000 














5253 


0254 72 


000000 


000000 


000000 


.WORD 


0,0.0,0 




•FRACTIONAL RESULT 




5254 


025500 


OOCOOO 

















KOJllA, 



AREAS 
MAC 



MAC>ll 30A(1052) 
15 MAR 04 15:51 



15 MAR 84 
T66 



16:56 PAGk 101 
TEST MODD 



SEQ nioi 





025502 


oooooo 


AAAAAA 

OOOOOO 


AAAAAA 

OOOOOO 


. WORD 




0255I0 


A/\AAAA 

oooooo 










02551c 


AA/\^/\A 

000200 






.WORD 


5^50 


0255 14 


AA/\^/\A 

0002O4 






. WORD 


5tf5V 










|2/AL*0*r 5HC 


5260 


025516 


005057 


001042 




CLR 


3^1 


025522 


AAA ? 

004767 


001110 




JSR 




025326 


AAAAAA 

oooooo 


AAAAAA 

OOOOOO 


AAAAAA 
OOOOOO 


1 I AO A 

.WORD 




025534 


OOOOOO 










023330 


AA 1 1 

001254 


XffJJJ 


AAAAAA 
OOOOOO 


. WORD 




025544 


OOOOOO 








3COO 


023346 


OOOOOO 


AAAAAA 

OOOOOO 


AAAAAA 
OOOOOO 


. WURD 




Oc3334 


AAAAAA 

OOOOOO 










023336 


oooooo 


AAAAAA 

OOOOOO 


AAAAAA 
OOOOOO 


. WORD 




023 5o4 


AAAAAA 

OOOOOO 








9c rO 


0233DO 


AA771 7 
OO f III 






LJAOA 

.WORD 




A^CC7A 


AA77AA 
OOf »04 






1 (AAA 

, WORD 


DC 'C 










1 3/HC>r 5RC*0 




Uc33 rc 


AAC^V7 


OUlU4<f 




CLR 


3c f * 


AOC^ 7il 

Uc33 '6 


r^\A 7417 


0%/i034 




JsR 




A^QX^^ 

U2360C 


036c3c 




123232 


.WORD 


7iL 
3C 'D 


0c3610 


123c30 








ii077 
JC ' f 


023612 


AAA VAA 

04UA0U 


OOOOOO 


AAAAAA 

OOOOOO 


.WORD 


3c fO 


02362v 


AAAAAA 
OOOOOO 








JC f "» 


O23oc2 


AAAAAA 

OOOOOO 


OOOOOO 


AAAAAA 

OOOOOO 


.WORD 


3cOU 


A^C£ TA 

0236^ 


AAAAAA 

OOOOOO 








3COX 


Uc3odc 


Ai*iLX77 
U300 ' ' 


\ ( t f I f 


1 77777 
\l 1 1 1 1 


unon 


9COc 


0c3640 


% 7777A 

1 1 1 1 m 








3cOO 


Oc3o42 


AAA*^* V 

000213 






.UORu 


DcO^ 


Oc3C>44 


AAA'W A 

00021/4 






.UORD 












|4/AC<0>r SRC 


DcOO 


AO^£^£ 
Uc304o 


AACAV 7 

005037 


AA4 AA ^ 

001042 




CLR 


3cO r 


Uc3632 


AA^ 7^ 7 

00476 7 


0007oO 




JSR 




Vlc303o 


1 AA'^ilA 

140240 


AAAAAA 

OOOOOO 


AAAAAA 

OOOOOO 


.WORD 


Dc07 


AO^H^LA 
Uc3004 


OOOOOO 










AO^JLJL^ 
UC3000 


OD3 r 14 


14o5I4 


133372 


.UORD 




Oc3o »4 


167737 








^C7C 


Uc30 f D 


AA/VW\ 

uuuuoo 


OOOOOO 


AAAAAA 

OOOOOO 


.WORD 


JC 70 


Aoc;7A* 
Uc3 i\J^ 


A/W%AA 










vc3 f VO 


1 JK777 

loo » f f 


1 7777 7 


162331 


.UORu 


ZJC 7 J 


Uc3 ' 1* 


\ 7^£ 

lc3 '26 








JC^TO 


Ue3 ' XO 


AAA04 A 

OOOelO 






.UURu 




Uc3 fCU 


UU0e04 






.UORD 


3c TO 










l5/AC>r SRC>0 


JC77 


UC3 ' CC 


AAtrAV7 

00303 ' 


AAl Ail 

00I042 




CLR 




WCJ » «iT> 


AAA7iL7 


AAAAAA 

OOO r04 




JSR 




UcD f JC 


AiC^'3AA 

U3oeOO 


OOOOOO 


AAAAAA 

OOOOOO 


.WORD 




Uc3 f *U 


AAAAAl 
OOOOUl 










Uc3 # *C 




OOOOOO 


AAAAAA 

OOOOOO 


.UORD 




UcD f 3v 


AAAAAA 
vOOOOO 






30v3 


Uc3 « 3*' 


AAAAAA 


AAAAAA 

OOOOOO 


AAAAAA 

OOOOOO 


.UORD 


5506 


025760 


OOOOOO 








5507 


025762 


056540 


oooooo 


OOOOOO 


.UORD 


5508 


025770 


000001 






5509 


025772 


000213 






.UORO 


5310 


025774 


000204 






.UORD 



0.0,0.0 

200 
204 

S«FLAG 
R7.MDDSUB 
0.0.0.0 lACO 

1254. 1.0.0 

0.0.0.0 

0.0.0.0 

7717 
7704 

a4PLAG 
R7.nODSUB 



I INTEGER RESULT 

, TEST TPS 
(RESULTANT TPS 

I NO INTERRUPT 

I 00 TEST 



jFSRC 

iFRACTIONAL RESULT 

I INTEGER RESULT 

I TEST FPS 

I RESULTANT FPS 



J NO INTERRUPT 

;00 TEST 



56252 . 125252 . 125252 . 125250 



tACO 



40500.0.0.0 

0.0.0.0 

56377.. 1,-1,. 4 

213 
204 

StTLAG 

R7.HDDSUB 
140240.0.0.0 



jFSRC 

iFRACTIONAL RESULT 

I INTEGER RESULT 

I TEST FPS 
.RESULTANT FPS 

tNO INTERRUPT 

»00 TEST 

tACO 



65714,146314.155572.167737 jFSRC 
0.0.0,0 (FRACTIONAL RESULT 

163777,-1.162531.125726 (INTEGER RESULT 



210 
204 

•♦FLAG 

R7.M00SUB 
56200.0.0,1 

40S40.0.0.0 

0.0.0,0 

56340,0,0.1 

213 
204 



I TEST FPS 
tRESULTANT FPS 

I NO INTERRUPT 

I 00 TEST 

lACO 
iFSRC 

(FRACTIONAL RESULT 

I INTEGER RESULT 

J TEST FPS 
tRESULTANT FPS 



GLOBAu 
KOJllA, 



AREAS MACtll 30A(1052: 
MAC 15 -MAR 84 15:51 



15 MAR 64 

T66 



16 



ST 



SEQ 0102 



5311 










5312 


025776 


005037 


001042 




5313 


026002 


004767 


000630 




5314 


026006 


056252 


125252 


125252 


5315 


026014 


125252 






5316 


026016 


040300 


000000 


000000 


5317 


026024 


000000 






5318 


026026 


000000 


000000 


000000 


5319 


026034 


000000 






5320 


026056 


056577 


177777 


177777 


5321 


026044 


177777 






5522 


026046 


000255 






5323 


026050 


000244 






5324 










5325 


026052 


00S057 


001042 




5326 


026056 


004767 


000554 




5327 


026062 


025252 


125252 


125252 


5328 


026070 


125252 






5329 


026072 


040500 


000000 


000000 


5350 


026100 


000000 






5551 


026102 


025577 


177777 


177777 


5532 


026110 


177777 






5555 


026112 


000000 


000000 


000000 


5554 


026120 


000000 






5535 


026122 


000255 






5556 


026124 


000240 






5557 










5558 


026126 


005057 


001042 




5559 


026132 


004767 


000500 




5340 


026156 


076600 


000000 


000000 


5541 


026144 


125252 






5542 


026146 


040300 


000000 


000000 


5343 


026154 


000000 






5344 


026156 


000000 


000000 


000000 


5345 


026164 


000000 






5346 


026166 


076700 


000000 


000000 


5347 


026174 


177777 






5548 


026176 


000200 






5549 


026200 


000204 






5350 










5351 


026202 


005057 


001042 




555? 


026206 


004767 


000424 




5553 


026212 


041525 


052S2S 


052S2S 


5354 


026220 


0S2S2S 






5355 


026222 


040500 


000000 


000000 


5356 


026230 


000000 






5557 


026252 


040177 


177777 


177777 


5358 


026240 


177740 






5559 


026242 


041656 


000000 


000000 


5360 


026250 


000000 






5561 


026252 


007700 






5562 


026254 


007700 






5363 










5364 


026256 


012757 


000001 


001042 


5365 


026264 


004767 


000546 




5366 


026270 


177777 


177777 


177777 



J6/TRUNCATE 
CLR 
JSR 
.WORD 

.WORD 

.UORD 

.WORD 

.UORD 
.UORD 

;7/TRUNCATE FRACTION 



8#FLAG I NO INTERRUPT 

R7,M00SUB iDO TEST 

56252 , 125252 . 125252 . 125252 



(ACO 



40500,0,0.0 

0,0,0.0 

56577.-1. l. 

255 
244 



CLR 
JSR 
.UORD 

.UORD 

.UORD 

.UORD 

.UORD 
.UORD 
(6/ROUND INTEGER 
CLR 
JSR 
.UORD 

.UORD 

.UORD 

.UORD 



B«FLAG 

R7.MD0SVJB 

23252 , 125252 , 12S2S2 . 125252 



iFSRC 

iFRACTICMAL RESULT 

I INTEGER RESULT 

I TEST FPS 
I RESULT FPS 

I NO INTERRUPT 

»D0 TEST 



iACO 



.UORO 
.WORD 



40500.0.0.0 

25577.-1,-1. 

0.0.0.0 

255 
240 

04FLM* 

R7.MD0SUB 
76600.0.0.125252 

40300.0.0.0 

0.0.0.0 

76700.0.0. -1 

200 
204 



i9/R0UND TMKMGH FRACTION 



«FSRC 

tFRACTIONAL RESULT 

{INTEGER RESULT 

J TEST FPS 
(RESULT FPS 

I NO INTERRUPT 

tOO TEST 

iACO 

;FSRC 

(FRACTIONAL RESULT 

•INTEGER RESULT 

I TEST FPS 
(RESULT FPS 



CLR 
JSR 
.UORD 

.UORO 

.WORD 

.UORD 



MFLAG 
RT.NOOSUe 



(NO INTERRUPT 

lOO TEST 



4li2S,05252S.52S25.S252S 
4OS00.O.0.0 iFSRC 
40177.. I.. I. 177740 



I ACO 



{FRACTIONAL RESULT 



41636,0.0.0 



I INTEGER RESULT 



.UORO 7700 
.WORD 7700 
(/OVERFLOW. TRAPS ENABLED 
HOV n,8«FLAG 
JSR R7.HD0SUe 
.WORD •l.'l.-lfl 



( TEST FPS 
(RESULT FPS 



(INTERRUPT 
(00 TEST 
(ACO 



GLOBAL 


AREAS 


MACYll 


KDJllA. 


MAC 15 -MAR -84 


5367 


026276 


177777 


5368 


026o0O 


A^ AAAA 
04O4OO 


5369 


026306 


000000 


5370 


026310 


000000 


5571 


026316 


000000 


5372 


026320 


100177 


5373 


026326 


177777 


5374 


026330 




5375 


026332 


107706 


5376 


026334 


A AAA 4 A 

000010 


5377 






5378 


026336 


AAC AV ^ 

005057 


5379 


026342 


AAA ^£ ^ 

004767 


5380 


026346 


ACf ^AA 

056 700 


5381 


026354 


177777 


5382 


026356 


A A A A A A 

044440 


5363 




Xf f f f ( 


5384 




OOOOilO 


5365 


026374 


AAAAAA 


5386 




Ag » < £ « 


5387 


AAA 

026404 


AA A7*f C 


5388 


026406 


AAAAAA 

000200 


5389 


026410 


AAA^AJI 

000204 


5390 






5391 


026412 


Al ^7 V7 

OI2757 


5392 


026420 


AAA T 

004767 


5393 


026424 


O66OOO 


5394 


026432 


AAAAAA 

000000 


5395 


026494 


Af f £ AA 

066600 


5396 


026442 


AAAAAA 

000000 


5397 


026444 


AAAAAA 

000000 


5398 


026452 


AAAAAA 

000000 


5399 


026454 


A « C ^AA 

015200 


5400 


026462 


AAAAAA 

000000 


5401 


026464 


Aii ^^AA 

047700 


5402 


026466 


147706 


5403 


026470 


AAAA 1 A 

000010 


5404 






5405 


0264 f 2 


012737 


5406 


026500 


AAil T 

004 7o7 


5407 


026 504 


100277 


5406 


026312 


1/777/ 


5409 


A^^C f il 

026314 


100300 


5410 


026522 


AAAAA4 

000001 


5411 


026524 


000000 


5412 


026532 


AAAAAA 

000000 


5413 


026534 


AAAAAA 
000000 


5414 


026D42 


AAAAAA 
000000 


5415 


0265*»* 


005200 


5416 


026546 


AAR^AA 

005204 


5417 


OeD55v 


AAAA1 A 
000010 


5418 






5419 


026552 


012737 


5420 


026560 


004767 


5421 


026564 


100277 


5422 


026572 


177777 



SEQ 0103 



000000 000000 
000000 000000 
177777 177777 



001042 
000270 

000000 000000 

177777 177777 

000000 000000 

100000 000001 



000002 
000212 
000000 

000000 

000000 

000000 



000002 
000132 
000001 

000001 

000000 

000000 



001042 
000000 
000000 
000000 
000000 



001042 
000002 
000001 
000000 
000000 



000001 001042 
000052 

000001 000002 



.WORD 40400.0.0.0 

.WORD 0.0.0.0 

.WORD 100177.-1,-1.-1 

,UORD 7700 

.WORD 107706 

. WORD 10 
J /INTEGER CHOPPED TO 56 BITS 



CLR 
JSR 
.WORD 

.WORD 

.WORD 

.WORD 

.WORD 
.WORD 



0«FLAG 
R7.MDDSUB 
56700.0.0.-1 



iFSRC 

I TRACT ZONAL RESULT 

J INTEGER RESULT 

I TEST FPS 
I RESULT FPS 
,FEC 

>N0 INTERRUPT 

I DO TEST 
jACO 



44440. -1. -1. - 
0.0.0,0 
63161.100000,1.40775 



jFSRC 

I FRACTIONAL RESULT 



(INTEGER RESULT 



200 
204 



{/OVERFLOW, TRAPS 0ISA8LED 



, TEST FPS 
I RESULT FPS 



nov 

JSR 
.WORD 

.WORD 

.WORD 

.WORD 

.WORD 
.WORD 
.WORD 



«2.8«FLAG 
R7,MDDSUB 
66600.0,0.0 

66600.0,0.0 

0,0,0.0 

15200.0.0.0 

47700 
147706 
10 



t /UNDERFLOW. TRAPS DISABLED 

MOV •2.MFLAG 

JSR R7.nDDSUB 

.WORD 100277.1,2.-1 

.WORD lOOSOO. 1.1,1 

.WORD 0,0,0.0 

.WORD 0.0,0.0 



;N0 INTERRUPT 
»D0 TEST 
jACO 

iFSRC 

tFRACTIONAt RESULT 

i INTEGER RESULT 

( TEST FPS 
iRESULT FPS 
iFEC 

sNO INTERRUPT 
iOO TEST 
jACO 

iFSRC 

•FRACTIONAL RESULT 

I INTEGER t^ESULT 



.WORD 5200 I TEST FPS 

.WORD 5204 iRESULT FPS 

.WORD 10 iFEC 

(/UNDERFLOW TRAPS ENABLED. UV AS RESULT 

MOV ♦l.»#rLAG (INTERRUPT 

JSR R7.M00SUB lOO TEST 

.WORD 100277,1,2.-1 |AC0 



m 
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5423 


026574 


100300 
000001 


000001 


000001 


.WORD 


100300.1.1.1 




jFSRC 


5424 


026602 












5425 


026604 


040417 


040001 


077403 


.UORD 


40417,40001.77403.0 


i FRACTIONAL RESULT 


5426 


026612 


000000 














5427 


026614 


000000 


000000 


^^^^^^^^^^^^ 

000000 


.WORD 


0,0.0,0 


« INTEGER RESULT 


5428 


026622 


000000 














5429 


026624 


002200 






.WORD 


2200 


1 TEST 


FPS 


5430 


026626 


102200 






.WORD 


102200 


•RESULT FPS 


5431 


026630 


000012 






.UORD 


12 


jFEC 




5432 










1 








5433 


















5454 


026632 


000167 


V AA 

000300 




JHP 


H0P15 


• JUMP 


OVER SUBROUTINE 


5435 










,*x*x*x*x«x*x*x*x*x*x*x*x*x*x*x*x«x*x*x*x*x*x*x*x*x*x*x*x*x 


5436 










l*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X 


5437 


















5438 












ACO 






5439 












FSRC 






5440 












FRACTIONAL RESULT 




5441 












INTEGER RESULT 






5442 












FPS BEFORE EXECUTION 




C M M 9 

5443 












FPS AFTER EXECUTION 
















CFEC) 






5445 


















Cii ii ^ 

5446 










i*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x«x*x*x*x*x*x*x*x*x*x*x*x*x*x 


5447 










i*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X 


5448 


















5449 


026636 


012605 






nOOSUB: NOV 


(SP)».R5 




t RETURN ADDRESS TO USE AS POINTER 


54 50 


026640 


012737 


026726 


000244 


MOV 


•50t.B«FPVEC 




J REDIRECT TRAP VECTOR 


5451 


026646 


012702 


AAA'WVA 

000200 




NOV 


•200. R2 




tSET TO DOUBLE NODE FOR LOAD 


5452 


026652 


170102 






LOPPS 


R2 




tLOAO FPS 


5455 


026654 


172415 






LOO 


(R5).AC0 




iLOAD ACO UITH TEST DATA 


5454 


026656 


012701 


025426 




MOV 


«HQ0GAR,RI 




(LOAD KNOUN INTO ACI 


Cil cc 

5455 


026662 


172511 






LOO 


(RD.ACl 






54 50 


02o6o4 


01O5O1 






NOV 


RS.RI 




i POINT TO FSRC DATA 


5457 


026666 


062701 


000010 




AOO 


•10. Rl 




5458 


026672 


016502 


000040 




NOV 


40(RS).R2 




jGET TEST FPS 


543^» 




170102 






LOFPS 


R2 




iLOAO TEST FPS 


D4oy 


















5401 




171411 






' NOOO 


(RD.ACO 




i*TEST INSTRUCTION 


54oe 




1700I1 






It: SETO 






lUAIT FOR POSSIBLE FPA TRAP. 


j400 










t 






54 o4 










{INSTRUCTION OIONT TRAP 






54o5 


02o7U4 


032737 


AAAAA4 

000001 


AA4 AA A 

001042 


BIT 


•l.MfLAC 




{VERIFY A NO TRAP COIOITION 


5466 


026712 


001426 






BEQ 


2t 




{BRANCH IF GOOD 


546 f 


026714 


104000 






ERROR 






{ALL ERRORS TO TRAP TO EMT VECTOR 


J400 




AAAA A^ 

vKK>402 






.WORD 


402 




{UNIQUE ERROR NUMBER 


540^» 




002013 






.UORO 


FPPERR 




i ADDRESS OF ERROR MESSAGE 


^A7A 
D4 f\J 














i INSTRUCTION SHOULD HAVE TRAPPED 


54 fl 


/\^^70^ 


AAA 4 £ *T 

000167 


AAAAil A 

000042 






2* 




{REJOIN CODE 


54 


















5473 










1 INSTRUCTION TRAPPED 






5474 


026726 


032737 


000001 


001042 


sot: BIT 


•1,0«FLAG 




{SEE IF EXPECTING A TRAP 


5475 


026734 


001005 






BNE 


511 




(BRANCH IF EXPECTING A TRAP 


5476 


026736 


104000 






ERROR 






(ALL ERRORS TO TRAP TO EMT VECTOR 


5477 


026740 


000403 






.UORO 


403 




(UNIQUE ERROR NUMBER 


5478 


026742 


002013 






.WORD 


FPPERR 




(ADDRESS OF ERROR MESSAGE 



GLOeAi. AREAS MACUl !0AUOS^) 
KOJllA.HAC IS MAR 84 1S:S1 



S4 79 








b480 


0P6744 




OOOOPO 

WVVt V 


5481 




012604 




5482 




005726 




5403 
















5485 




1 04000 




5486 


026764 


000404 




5487 


026766 


002013 




5488 








5489 








5490 








5491 


026770 


170203 




5492 


026772 


012702 


000200 

WVfc w 


549S 


026776 


1 70102 




5494 


027000 


012701 


001126 


5495 








5496 


027004 


1 7401 1 




5497 


027006 


026503 


000042 


5499 


027012 


001403 




5499 


027014 


104000 




5500 


027016 


000405 




5501 


027020 


002013 




5502 








SS05 


OZ A022 


010504 




5504 


027024 


062704 


000020 


5505 


027030 


004767 


15S112 


5506 


(127034 






5507 








5506 


OP704? 






5509 


027044 


00M06 




5510 


02' 046 






5511 








5512 








5513 


027050 


174111 




SS14 


027052 


010504 




5515 


027054 


0627O4 


ooooso 


SSI6 


027060 


004767 




5517 


027064 


OOS767 


ISI 7SO 


5518 


027070 


001403 




5519 


02707 ? 


104000 




5520 


027074 


000407 




5521 


027076 


002013 




5522 








5523 


027100 


0057S7 


001042 


5524 


02 •'104 


001002 




5525 


027106 


000165 


000044 


5526 


027112 


170301 




5527 


027114 


016504 


00O044 


5520 


02712"? 


020401 




5529 


027122 


001403 




5530 


027124 


104000 




5531 


027126 


C00410 




5532 


027130 


002013 




553^ 
55S4 








027152 


00C165 


000046 



15 MAR 84 16:56 PAGE 105 
T66 TEST MOOD 



JMP 21 

511: MOV (SP)».R4 

TST (SP). 

CMP •1I.R4 

BEQ 21 
ERROR 

.WORD 404 

.WORD FPPERR 

I COMMON CODE FOR TRAP AND NO 

2i! STFPS R3 

MOV 4200. R2 

LOFPS R2 

MOV MECOST.Rl 
I SAVE FRACTIONAL RESULT 

STO ACO.(Rl) 

CMP 42(R5).RS 

BEQ SI 

ERROR 

.WORD 405 

.UOftO FPPERR 



31: 


MOV 


R5.R4 




ADD 


•20. R4 


• • : 








TST 


COUNT 




BEQ 


SI 




ERROR 






.WORD 


406 




.UORO 


FPPERR 


iSAVE 


INTEGER 


RESULT 


5<: 


STO 






MOV 


RS.R4 




AGO 


•S0.R4 




JSR 


R7.DArvClt 




TST 


COUNT 




BEQ 


6t 




ERROR 






.UORO 


407 




.UORO 


rpPERR 


6t: 


TST 


8«FLAG 




8NE 


71 




JMP 


44(R5) 


71: 


STST 


R* 




MOV 


44(R5).R4 




CMP 


R4.RI 




BEQ 


at 




ERROR 






.WORD 


410 




.WORD 


FPPERR 


ai: 


JMP 


46(R5) 



S£0 0105 



(INSTRUCTION UASNT SUPPOSE TO TRAP 
jREJOIN CODE 

I SEE IF PC • INSTRUCTION 

I CLEAN UP STACK 

I 

I BRANCH IF GOOD COMPARE 
I ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 
(PC WAS INCORRECT 

TRAP 

(SAVE FPS 

(SET FPP TO DOUBLE 

(POINT TO RECEIVED DATA TABLE 

(SAVE ACO RESULT 
(VERIFT STATUS 
(BRANCH IF GOOD 

(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 

iBAO FPS 

(POINT TO EXPECTED DATA 

I VERIFY DATA 
(BRANCH IF GOOD 

(ALL ERRORS TO TRAP TO EM* VECTOR 
I UNIQUE ERAOR NUMBER 
(ADDRESS OF ERROR MESSAGE 

idAO ACO 

(SAVE ACl RESULT 
(POINT TO EXPECTED 

iVERIFt DATA 

ieflANCH IF GOOO 

I ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
lAOORESS or ERROR MESSAGE 

(BAD ACl 

(SEE IF NEED TO C»CCk FEC 

iMANCH IF NEED TO CHECK 

iRETURN FROM TEST 

I SAVE FEC 

(GET FEC 

(VERIFY FEC 

iBRANCM IF GOOD 

(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 
(BAD FEC 
(RETURN FROM TEST 



oLOBAl 


ARLAb 


viMC ill 


KOJUA.hAC ! 


LS MAR 64 


5555 






5556 


027156 




5557 


027136 




5558 






5559 






5540 






5541 


027156 




5542 


027136 


005267 


5545 






5544 


027142 


004767 


5545 


027146 


000177 


5546 


027154 


000001 


5547 


027156 


000000 


5548 


027164 


000000 


5549 


027166 


047557 


5550 


027170 


047544 


5551 






5552 


027172 


004767 


5555 


027176 


077577 


5554 


027204 


177777 


5555 


02 7206 


077577 


5556 


027214 


OOOOOO 


5557 


027216 


007540 


5558 


027220 


007540 


5559 






5560 


027222 


004767 


5561 


027226 


100377 


5562 


027234 


OOOOOO 


5565 


027236 


100577 


5564 


027244 


OOOOOO 


5565 


027246 


007517 


5566 


027250 


007510 


5567 






5568 


027252 


004767 


5569 


027256 


100000 


5570 


027264 


OOOOOO 


5571 


027266 


OOOOOO 


5572 


027274 


OOOOOO 


5573 


027276 


007757 


5574 


027300 


007744 


5575 






5576 


027302 


004767 


5577 


027306 


125252 


5578 


027314 


125252 


5579 


027316 


125252 


5580 


027324 


OOOOOO 


5581 


027326 


OOOOOO 


5582 


027330 


000010 


5583 






5584 






5585 


027332 


000167 


5586 






5587 






5588 






5589 






5590 







b^) 15 MAR, 



SEQ O106 



151642 

000170 
OOOOOO 

OOOOOO 



000140 
177777 

177777 



000110 
177777 

177777 



000060 
OOOOOO 

OOOOOO 



000030 
12S2S2 

125252 



000120 



OOOOOO 
OOOOOO 



177777 
OOOOOO 



100000 
OOOOOO 



OOOOOO 
OOOOOO 



125252 
OOOOOO 



H0P15: 
MSFO: 



litEST 67 



TEST STCrO 



TST67: 
il/AC-0 



t4/AC-0 



|5/AC<0 



INC 


ITESTN 


1 INCREMENT TEST 


JSR 
.WORD 


R7,SF0SUB 
0177,0.0,1 


lOO TEST 
lACO 


.UORO 


0.0,0.0 


iRESULT 


.WORD 47557 
.UORO 47544 
. TRUNCATE 
JSR R7.SFDSUB 
.UORO 77577.-1. 1. I 


1 TEST FPS 
•RESULT FPS 

iDO TEST 

|ACO 


.UORO 


77577.-1.0,0 


iRESULT 


.UORO 
.UORO 
. ROUND 
JSR 
.UORO 


7540 1 TEST FPS 
7540 iRESULT FPS 

R7,SF0SUB lOO TEST 
100577,. 1.100000.0 |ACO 


.UORO 


100577,. I. 0.0 


iRESULT 


.UORO 
.UORO 


7517 
7510 


1 TEST FPS 
1 RESULT TPS 


0 

JSR 
.UORO 


R7.srosue 

100000.0.0.0 


iDO TEST 
lACO 


.UORO 


0.0.0.0 


•RESULT 


.UORO 
.UORO 


7757 
7744 


1 TEST FPS 
•RESULT rPS 


1 

JSR 

.Htm) 


R7.SFDSUB iDO TEST 
125252 . 1252S2 , 1252S2 . 1252S2 


.UORO 


12S2S2. 125252.0.0 iRESULT 


.UORO 
.UORO 


0 
10 


1 TEST FPS 
•RESULT rPS 



• AGO 



Jf«> H0P16 I GET OVER SUVKJUTINE 

••X«X*X*X*X*X*X*X*X*X*)(*X*X«X*X*X«X*X*X*H*X*X*X*X*X*X*X*X*X 
(•X*X*X*X*X*X*X*X*X*X*X«X*X*X*X*X«X*X*X*X*X*X*X*X*X«X*X*X«X 

iSTCFO 

t ACO 
I RESULT 



I) J 



GLOBAL ARE Mb 
KOJllA.MAC 



5591 
559C 
559J 
5594 
5595 
5596 
5597 
559« 
5599 
5600 
5601 
5<>02 
5603 
5604 
5605 
5606 
5607 
5606 
5609 
5610 



MrtCm 50A(105J) IS 
15 MAR 64 15:51 



MAR 64 
T67 



16:58 PAGE 107 
TEST STCrO 



SEQ O107 



5629 
5630 
5631 
5632 
5633 
5634 
5635 
5636 
5637 
5638 
5639 
5640 
5641 
5642 
5643 
5644 
5645 
5646 



BEFORE EXECUTION 
FPS AFTER EXECUTION 



THERE CAN BE »0 TRAPS WITH THE STCFQ INSTRUCTION 

*X«X*X*X*X*X*X*>'.*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X«X*X*X*X*X*X 

«X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X»X*X*X*X*X*X*X*X*X*X*X 



027336 
02 '340 
027346 
027352 
027354 
027356 
027362 
027366 

027370 



012605 


SrOSUB: 


MOV 


(SP)».R5 


012737 


027444 000244 


MOV 


•SOI.0«fPVEC 


012702 


000200 


MOV 


#200, R2 


170102 




LOFPS 


R2 


172415 




LOO 


(R5).AC0 


012701 


001126 


MOV 


«REC0Sr.Rl 


016502 


000020 


MOV 


20CR5).R2 


170102 




LOFPS 


R2 


176011 


; 

401: 


STCFO 


ACO.(Rl) 



027444 
027444 
027446 
027450 

027452 

027456 

C27456 



027456 
027456 

027462 



104000 
000413 
002013 

000165 000024 



005267 151522 
005037 001042 



(INSTRUCTION OIDNT TRAP 
jVERIFY STATUS 



5611 


027372 


170203 




2t: 


STFPS 


R3 


5612 


027374 


016502 


000022 




MOV 


22(R5).R2 


5613 


027400 


020203 






CMP 


R2.R3 


5614 


027402 


001403 






BEQ 


SI 


5615 


027404 


104000 






ERROR 




5616 


027406 


000411 






.UORD 


411 


5617 


027410 


002013 






.UORO 


FPPERR 


5616 












RS.R4 


5619 


027412 


010504 




31: 


MOV 


5620 


027414 


062704 


000010 




ADO 


•10. R4 


5621 


027420 


004767 


152522 


4t: 


JSR 


R7.DATVER 


5622 


027424 


005767 


151410 




TST 


COUNT 


5623 


027430 


001403 






BEQ 


SI 


5624 


027432 


ictooo 






ERROR 




5625 


027434 


000412 






.WORD 


412 


5626 


027436 


002013 






.WORD 


FPPERR 


5627 














5628 


027440 


000165 


000024 


51: 


JMP 


24(RS) 



I SAO FPS 



t RETURN ADDRESS TO USE AS POINTER 

;REDIRECT TRAP VECTOR 

I SET TO DOUBLE MODE FOR LOAD 

I LOAD FPS 

I LOAD ACO WITH TEST DATA 
iPOINT TO RESULT AREA 
iCET TEST FPS 
I LOAD TEST FPS 

I* TEST INSTRUCTION 



I SAVE FPS 

iGET EXPECTED STATUS 
I VERIFY STATUS 
I BRANCH IF GOOO 

I ALL ERRORS TO TRRP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
i ADDRESS OF ERROR MESSAGE 



iSAO ACO 



(INSTRUCTION TRAPPED 
50t: 

ERROR 

.UORO 4tS 
.UORO FPPERR 



I POINT TO EXPECTED DATA 

I VERIFY DATA 
(BRANCH xr GOOD 

(ALL ERRORS TO TRAP TO EMT VECTOR 
lUNIQUE ERROR NUWER 
(ADDRESS OF ERROR MESSAGE 

) 

I RE TURN FROM TEST 



JMP 



24(R5> 



I ALL ERRORS TO TRAP TO EHT VECTOR 
tUNXOUE EmOR NMER 
imnRESS OF ERROR MESSAGE 

I INSTRUCTION UASNT SUPPOSE TO TRAP 

iRETURN FROM TEST 



H0P16: 
MSOF: 



IItEST 70 
TST70: 

INC 

ll/AC-0 

CLR 



TEST STCOF 



ITESTN 
8AFLAG 



(INCREMENT TEST NUMBER 
•NO tNTERRL«»T 



by 



GLOBAi. AREAS 
KDJllA.MAC 



HACtll S0A(1052) 
15 -MAR 84 15:51 



564? 


027466 


004767 


000220 


5648 


027472 


000177 


OOOOOO 


564 <» 


027500 


000000 




5650 


027502 


000000 


OOOOOO 


5651 


027506 


000200 




5652 


027510 


000204 




5653 








5654 


027512 


005037 


001042 


5655 


027516 


004767 


000170 


5656 


027522 


100000 


000300 


5657 


027550 


000100 




5658 


027532 


000000 


OOOOOO 


5659 


027536 


007777 




5660 


027540 


007744 




5661 








5662 


027542 


005037 


001042 


5665 


027546 


004767 


000140 


5664 


027552 


055555 


055555 


5665 


027560 


177777 




5666 


027562 


055555 


055555 


5667 


027566 


000240 




5668 


027570 


000240 




5669 








5670 


027572 


012737 


000001 


5671 


027600 


004767 


000106 


5672 


0276O4 


077777 


177777 


5675 


027612 


000000 




5674 


027614 


000000 


OOOOOO 


5675 


027620 


001200 




5676 


027622 


101206 




5677 








5678 


027624 


005037 


001042 


5679 


027630 


004767 


000056 


5680 


027634 


125252 


125252 


5681 


027642 


125252 




5682 


027644 


125252 


12S253 


5683 


027650 


007700 




5684 


027652 


007710 




5685 








5686 


027654 


012737 


000002 


568"^ 


027662 


004767 


000024 


5688 


027666 


077777 


177777 


5689 


027674 


OOOOOO 




5690 


027676 


OOOOOO 


OOOOOO 


5691 


027702 


006700 




5692 


027704 


006706 




5693 








5694 








5695 


027706 


000167 


000232 


5696 








5697 








5698 








5699 








5700 








5701 








5702 









15 MAR 84 

T70 



16:58 PACE 108 
TEST STCOr 



SEQ 0108 



,2>'AC--0 



JSR 
.UORO 

.UORD 
.WORD 
.UORD 



CLR 
JSR 



R7.SDPSUB 
177.0.0.0 

0.0 
200 
204 

S«FLAC 
R7.S0FSUe 



iDO TEST 
|AC0 



jHESULT 

I TEST TPS 

iRESULT TPS 



.UORD 100000.300,200.100 



I NO INTERRUPT 

iDO TEST 



lACO 



.UORD 0.0 

.UORD 7777 

.UORD 7744 
i3/AC>0. TRUNCATE 

CLR B«rLAG 

JSR R7.sorsue 

.UORD 55555.55555. 



1. 



.UORO 
.UORD 
.UORD 



55555.55555 
240 
240 



t4/AC<0. ROUND TO UNDEFINED VARIABLE 



iRESULT 
I TEST TPS 
, RESULT FPS 

(NO INTERRUPT 

iDO TEST 
1 lACO 

•RESULT 
I TEST TPS 
•RESULT TPS 



nov 

JSR 
.UORO 

.UORD 
.WORD 
.UORD 
iS/AC<0. ROUND 
CLR 
JSR 
.WORD 

.WORD 
.WORD 
.WORD 



•l.MTLAG 

R7. SOT SUB 
77777.-1.100000.0 



{INTERRUPT 
lOO TEST 

iACO 



0.0 

1200 

101206 



iRESULT 
I TEST TPS 
|R£SULT TPS 



atTLAG tNO INTERRUPT 

R7.S0FSUB iDO TEST 

125252 . 125252 . 125252 . 125252 



(ACO 



125252. 12525S 
7700 

7710 

16/ROUNO TO UV. TRAPS DISABLED 



MOV •Z.BiFLAG 

JSR R7.S0rSUB 

.WORD 77777,-1. l.O 

.WORD 0.0 

.UORO 6700 

.WORD 6706 



jriP 



M0P17 



•RESULT 
I TEST TPS 
t RESULT fPS 

•INTERRUPT 
lOO TEST 
lACO 

(RESULT 
I TEST rpS 
i RESULT FPS 

I GET OVER SUBROUTINE 



i 
i 

,«x*x«x*x*x*x«x*x«x*x*x*x*x*x*x«x*x*x*x*x*x«x*x*x*x*x*x*x«x 

5TC0F 
i ACO 
1 RESULT 



F9 



GLOBAc ARtrtb 
KOJllA.MAC 



MMC>ll 30A(lOb.?) 
15 MAR 84 15:51 



15 MAR 84 

T70 



16:58 PAGF. 109 
TEST STCDF 



S£Q 0109 



5703 






5704 






5705 






5706 






5707 






5708 






5709 






5710 


027712 


012605 


5711 


027714 


012757 


5712 


027722 


012702 


5713 


027726 


170102 


5714 


027730 


172415 


5715 


027752 


012701 


5716 


027736 


016502 


5717 


027742 


170102 


5718 






5719 


027744 


176011 


5720 


027746 


170527 


5721 


027750 


000000 


5722 






5723 






5724 


027752 


052757 


5725 


027760 


001426 


5726 


027762 


104000 


5727 


027764 


000414 


5728 


027766 


002015 


5729 






5730 


027770 


000167 


5731 






57?2 






5733 


027774 


052757 


5754 


030002 


001005 


5735 


030004 


104000 


5736 


030006 


000415 


5737 


030010 


002015 


5738 






5739 


050012 


000167 


5740 


030016 


012604 


5741 


050020 


005726 


5742 


050022 


022704 


5743 


030026 


001405 


5744 


050030 


104000 


5745 


030032 


000416 


5746 


050034 


002015 


5747 






5748 






5749 






5750 






5751 


050056 


170203 


5752 


050040 


016502 


5753 


050044 


020205 


5754 


030046 


001405 


5755 


050050 


104000 


5756 


050052 


000417 


5757 


030054 


002015 


5758 







027774 000244 
000200 



001126 
000014 



000001 001042 
000042 

000001 001042 

000020 
027746 



FPS BEFORE EXECUTION 
FPS AFTER EXECUTION 



A TRAP CAN ONLY OCCUR IF ROUNDING CAUSES OVERFUOU 

*X«X*X*X*X*X*X«X*X*X*X*X*X*X*X«X*X*X*X«X*X*X*X*X*X*X*X*X*X 

«X*X*X*X*X«X*X*X*X*X*X*X«X*X*X*X*X*X*X*X*X*X*X«X*X*X«X«X*X 



SOFSUB: MOV (SP)«,R5 

MOV •50».»#FPVEC 

MOV •200. R2 

LOFPS R2 

LOD (R5).AC0 

MOV ♦RECOST.Rl 

MOV 14(R5).R2 

LOFPS R2 

40»: STCDF ACO.(Rl) 

1»: STST (PC)» 

.UORD 0 

I INSTRUCTION OIONT TRAP 

BIT •l.a«FLAG 

BEQ 2t 
ERROR 

.WORD 414 

.WORD FPPERR 



JMP 



2t 



J INSTRUCT ION TRAPPED 
50t: BIT tl.a^fLAG 

BNE 511 

ERROR 

.UORD 415 
.UORD FPPERR 



Sit: 



JMP 

MOV 

TST 

CMP 

BEQ 

ERROR 

.UORD 

.UORD 



21 

(SP)».R4 
<SP). 
•1I.R4 
21 

416 
FPPERR 



I RETURN ADDRESS TO USE AS POINTER 

(REDIRECT TRAP VECTOR 

I SET TO DOUBLE MODE FOR LOAD 

I LOAD FPS 

I LOAD ACO WITH TEST DATA 
I POINT TO RESULT AREA 
I GET TEST FPS 
iLOAD TEST FPS 

i*TEST INSTRUCTION 

iWAIT FOR POSSIBLE FPA TRAP. 

I STORE STATUS HERE. 



jVERIFY A NO TRAP CONDITION 
I BRANCH IF GOOD 

I ALL ERRORS TO TRAP TO EMT VECTOR 
I UNIQUE ERROR NUMBER 
{ADDRESS OF ERROR MESSAGE 
•INSTRUCTION SHOULD HAVE TRAPPED 
•REJOIN CODE 



I SEE IF EXPECTING A TRAP 
•BRANCH IF EXPECTING A TRAP 
•ALL ERRORS TO TRAP TO EMT VECTOR 
• UNIQUE ERROR N^JMBER 
•ADDRESS OF ERROR MESSAGE 
•INSTRUCTION UASNT SUPPOSE TO TRAP 
•REJOIN COK 

•SEE IF PC " INSTRUCTION 
•CLEAN UP STACK 

! BRANCH IF GOOD COMPARE 
•ALL ERRORS TO TRAP TO EMT VECTOR 
•UNIQUE ERROR NUMBER 
t ADDRESS uF ERROR MESSAGE 
I PC UAS INCORRECT 



•COMMON CODE FOR TRAP AND NO 
•VERIFY STATUS 



TRAP 



2t. 



STFPS 
MOV 
CMP 
BEQ 
ERROR 
.UORD 
.UORD 



R5 

16(R5).R2 

R2.R5 

St 

417 

FPPERR 



iBAO FPS 



•SAVE FPS 

•GET EXPECTED STATE'S 
•VERIFY STATUS 
•BRANCH IF GOOD 

•ALL ERRORS TO TRAP TO EMT VECTC« 
•UNIQUE ERROR NUMBER 
•ADDRESS OF ERROR MESSAGE 



GLOBAL 


AREAS 


MACi 11 


30A( 1052) 


15 -MAR 84 16:56 PA 


Gf 1 10 




KOJllA. 


MAC 


L5-riAR-84 


15:51 


V ^A 

T70 


TEST S 


TCOF 






030056 


010504 




3$ : 


MOV 


N5 .HA 


A A Tk.1 T ▼ A P WAP ATPA AJtTA 

tPOINT TO EXPECTED DATA 


5760 


030060 


062704 


A AAA % A 

OOOOlO 




AOO 


<^10 , R4 




5761 


030064 


004767 


152040 


4$ : 


JSR 


AATl/CD 

H / ,0" 1 Vr R 


■ JPATPm aaTa 

(VERIFY DATA 


5762 


050070 


AAC 

005767 


• e A Y ji A 

150744 




TST 


^Ai A.1T 


5763 


030074 


001405 






BEQ 


51 


t BRANCH IF GOOD 


5764 


030076 


• Ad AAA 

104000 






ERROR 




All C on An f TA TAAA TA P M T 4 ^ V AA 

|ALL ERRORS TO TRAP TO EnT VECTOR 


5765 


030100 


AAA A '^A 

000420 






.UORD 


Ji ^A 

420 


I UNIQUE ERROR NUMBER 


5766 


030102 


002013 






. WORD 


f ADC on 


AAAAP f f AC P AA AA a ar* ^ ^ it^^ 

t ADDRESS OF ERROR MESSAGE 


5767 














BAA A^A 

IdAU ACO 


5768 


A V A « Ail 

030104 


AAC ^ V ^ 

005737 


AA 4 Ail t 

001042 


5$ : 


TST 




CC C kJf f A T A At-tf Al# CPA 

iSEE IF NEED TO CHECK FEC 


5769 


030110 


■ A^\^ 

001002 






BNE 


7» 


nn a^aAlj tc ft.icc a ▼ a a<..^p 

J BRANCH IF NEED TO CHECK 


5770 


030112 


AAA * £ C 

000165 


A AAA ^ A 

000020 




JMP 


20C H5 ; 


nC Tl tfMJ Pn^^M TCP T 


5771 








J VERIFY 


r EC 






5772 


030116 


012704 


001106 


7$ ; 


MOV 


<mtCr tC .^4 


nAT&iT TA CC#* AAP A 

1 POINT TO rtC AREA 


5775 


030122 


« ^AV * M 

170514 






^ T f T 

STST 


( R4 ) 


CAt«C f*C^ 


5' 74 


ATA 4 'iM 

050124 


A*^ 4 

021427 


AAAA 4 A 

OOOOlO 




CMP 


^ Qd ^ At A 

CH4 ) ,010 


CCA C An AtiCnci A< t 

iVERIFY FEC FOR OVERFLOW 


5775 


A V A 1 V A 

050150 


001405 






BEQ 


8» 


1 BRANCH IF GOOD 


57 76 


A V A « V% 

050152 


104000 






ERROR 




A J 1 c nn^^n p ta TnAn ta p ^ t t «p ▼ aa 

lALL cHRORS to trap TO EnT VECTOR 


5777 


A V A « V A 

050X34 


000421 






.UORD 


421 


1 AiTAi f CAnAA ^^Acn 

ivMIQ^ ERROR NlfWER 


5778 


030136 


002013 






.UORO 


FPPtKR 


A AAAC P P AP P AAAA P P APP 

1 ADDRESS OF ERROR MESSAGE 


5779 














BAA CCA 

loAu FEC 


5780 


AVA* AA 

050140 


AAA 4 £ C 

000165 


AAAA*) A 

000020 


81 : 


IMA 

JMP 


20CH5 } 


iRcTURN rRun TEdT 


5781 








i 








5782 


A V A • Jt A 

050144 






M0P17: 








5783 


050144 






MSFOI: 








5784 
















5 ^85 








: •TEST 


71 


TflfPT f!* T/*CA 

TEST STCFO 


t IP Tk^P* Tl i CPA* AAA* A AT^^n 

• USING ILLEGAL nCCUnULATOR 


J »oo 
















3 f 8 ' 


030144 






TST71: 








5 f 88 


ATA « A ^ 

030144 


AAC 'Vf ^ 

005267 


« EA^ 

150654 




INC 


•TESTN 


tlNCRE'CNT TEST NUMBER 


J » o"» 


05O150 


A « ^^A « 

012701 


Ad AAAA 

040000 




MOV 


#40000 iRl 


iDISAOLC INTERRUPTS 




050154 


4 TA « A4 

170101 






lofps 


A « 

Rl 


1 




030156 


% AA^ 

176006 






STCFO 


A/*A 


l*TEST ILLEGM. IMSTRUCTXON 




050160 


1 70202 






STFPS 


R2 


iSRVC STATUS 




A V A If) 

050162 


170505 






^ T^ T 

STST 


H5 


iSAWt FCC 


J r 


A VAl CM 


A^"*7A*^ 

022702 


4 M AAAA 

I40000 




CMP 


At AAAAA A^ 


iVtRIrY FtR SET 


^ 70<^ 


AVAl 7A 


AA4 il A V 

0O1405 






BEQ 


11 


lOnANCH IF ERROR RECEIVED 


^7<Ml 
J f ^> 


AVA1 7^ 


1 Ail AAA 

1Q4000 






ERROn 




A4 • F^MW^Af TA TfliAA TA CmT «aPATAA 

|ALL ERRORS TO TRAP TO EMT VECTOR 


^7Q7 


AVAl 7 A 


000422 






.UORD 


d ^ n 
422 


a A«T#ta At cawifij- Am ^rfAP A 


S7QA 


ATA1 7JL 
USUI » O 








.UURO 


f rVcRH 


lAOyficSS V CrnQR V^SSAGE 


J fry 














A ATT A^%T T AAa Ta a R*#*A& TA^ T 

iFER VIT NOT SET ON ILLEGAL INST. 




050200 


022705 


AAAAA*^ 

000002 


It : 


CMP 


♦2.RS 


1 VERIFY FEC " FLOATING OPCOOE ERROR 




ATAOA^ 


AA 1 A AV 

OO1405 






Alt A 

BcQ 


2> 


^ AA A^«AA-a T^ 

tSRANCH IF GOOD 






1 Ail AAA 

104000 






ERROR 




Al i PffMPhAAP TA TAAA TA PMT k^PPV^'^A 

lALL ERRORS TO TRAP TO EMT VECTOR 




A X A*) 4 A 

030210 


AAAd t V 

000425 






.WORD 


423 


lUNIQUC ERROR NU^^R 




050?l«r 


AA*)A 1 V 

002013 






.UORO 


C AAP AA 


1 ADDRESS OF ERROR MESSAGE 


5o05 














trEC INCORRECT 


5806 


030214 






21: 






5807 
















^A/\A 

5ooe 








1 










05U21* 






MCLRO: 








3010 
















Doll 








^ TP r> T 

i«TEST 


72 


TV ^T ^1 AA 

TEST CLRD 




5ol<^ 
























TST72: 








5814 


030214 


005267 


150564 




INC 


ITESTN 


» INCREMENT TEST NUMBER 



SEQ 01 10 



1 



ol OBAi ARl As MAC i 1 1 50Al lOb^ ) 
KOJllA.MAC 15 MAR 84 15:51 



IS MAR 84 

T72 



16:56 PAGE III 



5815 


030220 


012701 


001726 


5816 


030224 


012704 


000200 


5817 


030230 


170104 




5818 


030232 


172411 




5819 


030234 


012701 


001126 


5820 


030240 


174011 




5821 


030242 


170411 




5822 


030244 


012704 


001256 


5825 


0302S0 


004767 


151672 


5824 


030254 


005767 


150560 


5825 


030260 


001403 




5826 


030262 


104000 




5827 


030264 


000424 




5828 


030266 


002013 




5829 








5830 


030270 


170202 




5831 


030272 


020227 


000204 


5832 


030276 


001405 




5833 


030300 


104000 




5834 


030302 


000425 




5835 


03C304 


002013 




5836 








5837 


030306 






5838 








5839 








5840 


030306 






5841 








5842 








5843 








5844 


030306 






5845 


030306 


005267 


150472 


5846 


030312 


012704 


040200 


5847 


030316 


170104 




5846 


030320 


170406 




5849 


030322 


170203 




5850 


030324 


170S05 




5851 


030326 


022703 


140200 


5852 


030332 


001403 




5853 


030334 


104000 




5854 


030336 


000426 




5855 


030340 


002013 




5856 








5857 


030342 


022705 


000002 


5858 


030346 


001403 




5859 


030350 


104000 




5860 


030352 


000427 




5861 


030554 


002013 




5862 








5863 


030356 






5864 








5865 








5866 


030356 






5867 








5868 








5869 








5870 


030356 







It: 



TEST CLRO 


MOV 


9TAB47,R1 


MOV 


•200, R4 


LOFPS 


R4 


LOO 


(Rl).ACO 


MOV 


•RE COST. Rl 


STO 


ACO.(Rl) 


CLRO 


(Rl) 


MOV 


•TAB6.R4 


JSR 


R7,DATVER 


TST 


COUNT 


BEQ 


11 


ERROR 




.UQRO 


424 


.WORD 


FPPtHK 


STrps 


R2 


CMP 


R2 , #204 


BEQ 


2* 


ERROR 




.WORD 


425 


.UORO 


FPPERR 



SEQ mil 



21: 



jPQINT TO DATA 

I SET rPP STATUS TO DOUBLE 



(POINT TO DATA BUTFER 
I STORE GARBAGE 
(CLEAR DATA BUFFER 
(VERIFY BUFFER «0 
( 

(BRANCH I RECDST - 0 
(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
I ADDRESS OF ERROR MESSAGE 
(RECDST NOT CLEARED 
(SAVE STATUS 
(VERIFY STATUS 
(BRANCH IF GOOD 

(ALL ERRORS TO TRAP TO EMT VECTOR 
lUNIOUE ERROR NUMBER 
I ADDRESS OF ERROR MESSAGE 
(BAD STATUS 



HCLRI: 

I !*•*••••« 

I •TEST 7S 

» I 

TST75: 



TEST CLRO. XLLEGM. ACCUNULATOR 



It: 



2t: 



INC 


tTESTN 


NOV 


•40200. R4 


LDTPS 


R4 


CLRO 


R6 


STFPS 


RS 


STST 


R5 




•14O200.RS 


BEQ 


It 


ERROR 




.yoRO 


426 


.UORO 


FPPERR 


CMP 


«2.R5 


BEQ 


2« 


ERROR 




.WORD 


427 


.UORO 


FPPERR 



(INCREMENT TEST NUMBER 
lOISASLE INTERRUPTS 
iLOAD STATUS 

(•TEST INSTRUCTION UITh ILLEGAL ACC 
(SAVE STATUS 
I SAVE FEC 
iVERXFv ERROR 
iBRANCH IF FER SET 
(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMKR 
(AOORESS OF ERROR tCSSAGE 
(ERROR IN FPS 

(VERIFY FEC *2 OPCODE ERROR 
(BRANCH IF GOOD 

(ALL ERRORS TO TRAP TO EMT VECTOR 

(UNIQUE ERROR NUMBER 

(AOORESS OF ERROR MESSAGE 

(BAD FEC 



r«.Sl{ 
((•••••••< 

(•TEST 74 

((•••••••* 

TST 74: 



TEST LOFPS. STFPS NODE I 



KOJllA.MAC 



MACtll 30A(105^) 
15 riAR 64 15:S1 



15 "'^^^J 



^^'?fsT'*L8fpi|^bTFPS Moot 



SEQ 0112 



5871 


030356 


005267 


5872 


030362 


012704 


5875 


030366 


012714 


5874 


030372 


012701 


5875 


030376 


012737 


5876 


030404 


170114 


5877 


030406 


170211 


5878 


030410 


020427 


5879 


030414 


001403 


5880 


030416 


104000 


5881 


030420 


000450 


5882 


030422 


002013 


5883 






5884 


030424 


020127 


5885 


050450 


001403 


588f- 


030432 


104000 


588' 


030434 


000431 


56(6 


050456 


002013 


5889 






5890 


030440 


023727 


5891 


030446 


001412 


5892 


030450 


104000 


5893 


030452 


000432 


5894 


030454 


002013 


5895 






5896 


030456 


000167 


5897 






5896 


030462 


012600 


5699 


030464 


012605 


5900 


030466 


104000 


5901 


030470 


000433 


5902 


030472 


002013 


5903 






5904 


030474 




5905 






5906 






5907 


030474 




5908 






5909 






5910 






5911 


030474 




5912 


030474 


005267 


5913 


030500 


012704 


5914 


030504 


012714 


5915 


030510 


012701 


5916 


030514 


012737 


5917 


03O522 


170124 


5918 


030524 


170221 


5919 


030526 


020427 


5920 


030532 


001403 


5921 


030534 


104000 


5922 


030536 


000434 


5923 


030540 


002013 


5924 






5925 


030542 


020127 


5926 


030546 


001403 



II: 



21: 



INC 
MOV 
MOV 
MOV 
MOV 
LOFPS 

STrps 

CMP 

BEQ 

ERROR 

.WORD 

.WORD 

CMP 

BEQ 

ERROR 

.WORD 

.UORO 

CMP 

BEQ 

ERROR 

.UORO 

.UORO 

JMP 



ITESTN 

♦TSTL0C.R4 

♦147757. rR4 ) 

♦RECST.Rl 

•10I.84FPVEC 

(R4) 

(Rl) 

R4.#TSTL0C 
II 

430 

rPPERR 

Rl.#RtCST 
21 

431 

FPPERR 

••RECST, #147757 
31 

432 

rpPERR 
31 



iBAO Rl 



INCREMENT TEST NUMBER 

POINT R4 TO BAM 

SETUP EXPECTED STATUS 

SET BUFFER FOR RECEIVED STATUS 

SETUP TRAP VECTOR 

•TEST INSTRUCTION 

•TEST INSTRUCTION 

VERIFT R4 

BRANCH IF GOOD 

ALU ERRORS tq trap TO EMT VECTOR 
UNIQUE ERROR NUMBER 
ADDRESS OF ERROR MESSAGE 



VERIFT Rl 

BRANCH IF GCKX) 

ALL ERRORS TO TRAP TC EM» 

UNIQUE ERROR NUMBER 

ADDRESS OF ERROR MESSACF 



VECTOR 



I UNEXPECTED TRAP 

101: nOV (SP)>.RO 

HOV (SP)*.R5 
ERROR 

.UORO 4S3 

.UORO rpPERR 

51: 



MLS2: 



VERIFY STATUS 
BRANCH F GOOD 

ALL ERRORS TO TRAP TQ EMT vtCTQR 
UNIQUE ERROR NUMBER 
At)ORESS or ERROR MESSAGE 
iBAO STATUSV 

I GET OVER TRAP 

(SAVE PC 
tSAvE PS 

I ALL ERRORS TO TRAP TO EMT VECTOR 
I UNIQUE ERROR HTKtk 
I ADDRESS OF ERROR rCSSAGE 
I UNEXPECTED TRAP 



1 

I •TEST 



TEST LOPPS. STFPS MODE 2 



It* 

TST75! 



150304 


INC 


•TESTN 


001136 


MOV 


•TSTL0C.R4 


145557 


HOV 


•145557. (R4} 


001116 


MOV 


•RECST.Rl 


0S06O0 000244 


MOV 


♦lOI.B^FPVEC 




LOFPS 


(R4). 




STFPS 


(Rl)* 


001140 


CMP 


R«.^TSTLOC»a 




BEQ 


11 




ERROR 






.UORO 


454 




.UORO 


FPPERR 


001120 11: 


CMP 


Rl.4RECST»2 




BEQ 


it 



• INCREMENT TEST NU»«ER 

iPOINT R4 TO RAH 

» SETUP EXPECTED STATUS 

I SET BUFFER FOR RECEIVED STATUS 

» SETUP TRAP VECTOR 

{•TEST INSTRUCTION 

J •TEST INSTRUCTION 

(VERIFY R4 

iBRANCH IF GOOD 

I ALL ERRORS TO TRAP TO EMT VECTOR 
I UNIQUE ERROR NUMBER 
{ADDRESS OF ERROR MESSAGE 

iVERIFt Rl 

J BRANCH IF GOOD 



Gl OBAl areas 
KOJllA.MAC 



MACni 50A{1052) 
15-WAR 84 15:51 



15 MAR 84 

T75 



5927 


030550 


104000 


5928 


0S0S52 


000455 


5929 


050554 


002015 


5950 






5931 


030556 


023727 


5932 


030564 


001412 


5933 


030566 


104000 


5934 


030570 


000456 


5935 


050572 


002015 


5936 






5937 


050574 


000167 


5938 






5939 


030600 


012600 


5940 


030602 


012605 


5941 


030604 


104000 


5942 


030606 


000437 


5945 


050610 


002015 


5944 






5945 


030612 




5946 






5947 






5948 


030612 




5949 






5950 






5951 






5952 


030612 




5953 


030612 


005267 


5954 


030616 


012704 


5955 


030622 


012757 


5956 


030630 


012757 


5957 


050656 


012701 


5958 


030642 


012757 


5959 


030650 


012737 


5960 


030656 


170154 


5961 


030660 


170231 


5062 


030662 


020427 


5963 


030666 


001405 


5964 


050670 


104000 


5965 


030672 


000440 


5966 


030674 


002015 


5967 






5968 


050676 


020127 


5969 


050702 


001405 


5970 


030704 


104000 


5971 


030706 


000441 


5972 


050710 


002015 


5973 






5974 


030712 


025727 


5975 


030720 


001412 


5976 


030722 


104000 


5977 


030724 


000442 


5978 


030726 


002015 


5979 






5980 


030730 


000167 


5981 






5982 


050734 


012600 



J J 

16:58 PAGE 115 

TEST LDFPS, STFPS MODE 2 

E9R0R 

.WORD 455 
.WORD FPPERR 



3EQ 0113 



145557 21 s 



CMP 
BEQ 
ERROR 
.WORD 456 
.WORD FPPERR 



84»RECST. 0145557 
51 



I BAD Rl 



jALL ERRORS TO TRAP TQ EMT VECTOR 

(UNIQUE ERROR NUMBER 

t ADDRESS or ERROR MESSAGE 



JMP 5t 
I UNEXPECTED TRAP 

101: MOV (SP)».RO 

MOV (SP)».R5 

ERROR 

.WORD 437 

.UORO FPPERR 

5<: 



jVERIFY STATUS 
(BRANCH f GOOD 
(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
(ADDRESS or ERROR MESSAGE 
(BAD STATUSN 

(GET OVER TRAP 

(SAVE PC 
(SAVE PS 

(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 
(UNEXPECTED TRAP 



150166 
001156 
001142 
147501 
001146 
001116 
050754 



001140 



001150 



MLS5: 
(»••••< 

(•TEST 

TST76: 



76 



TEST LOrPS. STFPS MQOC 5 



001156 
001142 

001146 
000244 



Iti 



001116 14 7501 2«: 



000012 



lot; 



INC 


ITESTN 


(INCREMENT TEST NUMBER 




MOV 


•TSTL0C.R4 


(POINT R4 TO RAM 




MOV 


•TSTL0C*4.8*TSTL0C 


iTSTlOC- DEFERRED ADDRESS 




MOV 


•i475Ol.0*TSTLK*4 


t SETUP EXPECTED STATUS 




MOV 


•TSTLOC*lO.Rl 


iRl POINTS TO TSTLOC'IO 




MOV 


«RECST.MTSTtOC»10 


(SET DEFERRED BUFFER FOR RECEIVED STATUS 


MOV 


•lOI.MrPVcC 


(SETUP TRAP VECTOR 




torps 


•CfM)* 


(•TEST INSTRUCTION 




STFPS 


0(RI)» 


(•TEST INSTRUCTION 




CMP 


M.mTLOC*? 


(VERIFY R4 




BEQ 


11 


(BRANCH IF GOOD 




ERROR 




(ACL ERRORS TO TRW> TO EMT 


VECTOR 


.UORO 


440 


(UNIQUE ERROR NUMBER 




.UORD 


rpPEfw 


(ADDRCSS OF ERROR MESSAGE 




Ct» 


«1.#TSTL0C»12 * 


(VERIFY Rl 




BEQ 


21 


(BRANCH IF GOOD 




ERROR 




(ALL ERRORS TO TRAP TO EMT 


VECTOR 


.UORD 


441 


(UNIQUE ERROR NUMBER 




.UOftO 


FPPERR 


(ADDRESS OF ERROR MESSAGE 






iBRO Rl 




CMP 


S«RECST.«147S01 


(VERIFY STATUS 




BEQ 


U 


(BRANCH F GOOD 




ERROR 




(ALL ERRWS TO TRAP TO EMT 


VECTOR 


.yoRO 


442 


(VJNIQUE ERROR NUMBER 




.UORD 


FPPERR 


(ADDRESS OF ERROR MESSAGE 






(BAD 


statusn 




JMP 


5t 


(GET OVER TRAP 




TED TRAP 




MOV 


(SP)».RO 


(SAVE PC 





U.06AL ARtAS 
KOJllA.MAC 



MACrU 50A(1052) 
15 MAR 64 15:51 



15 MAR 84 
T76 



16:58 PAGE 114 
TEST LOFPS. 



STFPS MODE 3 



SEQ 0114 



5985 


050736 


012605 


5984 


030740 


104000 


5985 


050742 


000443 


5986 


030744 


002013 


5987 






5988 


030746 




5989 






5990 






5991 


030746 




5992 






5993 






5994 






5995 


030746 




5996 


050746 


00526'' 


5997 


030752 


012704 


5998 


050756 


012737 


5999 


030764 


012701 


6000 


030770 


012757 


6001 


030776 


170144 


6002 


031000 


170241 


6003 


031002 


020427 


6004 


031006 


001403 


6005 


031010 


104000 


6006 


031012 


000444 


6007 


0S1014 


002013 


6008 






6009 


031016 


020127 


6010 


031022 


001403 


6011 


031024 


104000 


6012 


031026 


000445 


6013 


031030 


002013 


6014 






6015 


031032 


023727 


6016 


031040 


001412 


6017 


031042 


104000 


6018 


031044 


000446 


6019 


031046 


002013 


6020 






6021 


031050 


000167 


6022 






6023 


031054 


012600 


6024 


031056 


012605 


6025 


031060 


104000 


6C'»6 


031062 


000447 


6027 


031064 


002013 


6028 






6029 


031066 




6030 






6031 






6052 


051066 




6033 






0054 






6055 






6036 


031066 




6037 


051066 


005267 


6038 


031072 


012704 



MOV (SP)».R5 
ERROR 

.WORD 443 

.WORD FPPERR 



3»: 



(SAVE PS 

I ALL ERRORS TO TRAP TO EMT VECTOR 
; UNIQUE ERROR NUMBER 
i ADDRESS OF ERROR MESSAGE 
I UNEXPECTED TRAP 



MLS4i 



150032 
001140 

147757 001136 
001120 

031054 000244 



001136 



t*TEST 77 
TST77: 

INC 
MOV 
tlOV 
MOV 

nov 

LOFPS 
STFPS 
CMP 
BEQ 
ERROR 
.WORD 



TEST LOFPS. STFPS MODE 4 



ITESTN 

•TSTL0C*2.R4 

♦147757. 8#TSTL0C 

•RECST»2»R1 

*10t»6«FPVEC 

•(R4) 

-CRD 

R4.«TSTL0C 
II 



444 

.UORO FPPERR 



001116 



1»! 



001116 147757 21; 



000012 



CMP 

BEQ 

ERROR 

.UORD 

.UORO 

CHP 

BEQ 

ERROR 

.WORD 

.UORO 

JMP 



R1.4RECST 
2t 

445 

FPPERR 

©•RECST. #147757 
S» 

446 

FPPERR 

3$ 



iBAO Rl 



•INCREMENT TEST NUMBER 

I POINT R4 TO RAM 

iTSTLOC- STATUS ADDRESS 

I SET BUFFER FOR RECEIVED STATUS 

I SETUP TRAP VECTOR 

t*TEST INSTRUCTION 

l*TEST INSTRUCTION 

•VERIFY R4 

{BRANCH IF GOOD 

lALL ERRORS TO TRAP TO EMT VECTOR 

•UNIQUE ERROR NUMBER 

t ADDRESS OF ERROR MESSAGE 

{VERIFY Rl 
•BRANCH IF GOOD 

(ALL ERRORS TO TRAP TO EMT VECTOR 
•UNIQUE ERROR NUMBER 
•ADDRESS OF ERROR MESSAGE 



•BAD 



•UNEXPECTED TRAP 

lot: nov (SP)*.R0 

MOV (SP)».RS 
ERROR 

.WORD 447 

.UORO FPPERR 

SI: 



•VERIFY STATUS 
(BRANCH F GOOD 

•ALL ERRORS TO TRAP TO EMT VECTOR 
•UNIQUE ERROR NUMBER 
{ADDRESS OF ERROR fCSSAGE 
STATUSV 

•GET OVER TRAP 



•SAVE PC 
•SAVE PS 

(ALL ERRORS TO TRAP TO EMT VECTOR 
•UNIQUE ERROR NUMBER 
(M>ORESS OF ERROR MESSAGE 
•UNEXPECTED TRAP 



MLS5: 

[•TEST 100 

I 1*********4 

TSTIOO: 

INC 
MOV 



TEST LDFPS, STFPS MODE 5 



•TESTN 

#TSTLX»2.R4 



•INCREMENT TEST NUMBER 
•POINT R4 TO RAM 



L 



GLOeAt. AREAS 
KOJllA.riAC 



MACVII 30A(1052) 
15-HAR-84 15:51 



6039 


031076 


012737 


OOi.142 


6040 


031104 


012737 


147501 


6041 


031112 


012701 


001150 


6042 


031116 


012737 


001116 


6043 


031124 


012737 


031210 


6044 


031132 


170154 




6045 


031134 


170251 




6046 


031136 


020427 


001136 


6047 


031142 


001403 




6046 


031144 


104000 




6049 


031146 


000450 




6050 


031150 


002013 




6051 








6052 


031152 


020127 


001146 


6053 


031156 


001403 




6054 


031160 


104000 




6055 


031162 


000451 




6056 


031164 


002013 




6057 








6056 


031166 


023727 


001116 


6059 


031174 


001412 




6060 


031176 


104000 




6061 


031200 


000452 




6062 


031202 


002013 




6063 








6064 


031204 


000167 


000012 


6065 








6066 


031210 


012600 




6067 


031212 


012605 




6066 


031214 


104000 




6069 


031216 


000453 




6070 


031220 


002013 




6071 








6072 


031222 






6073 








6074 








6075 


031222 






6076 








6077 








6076 








6079 


031222 






6080 


031222 


005267 


147556 


6081 


031226 


012704 


001136 


6082 


031232 


012737 


140001 


6063 


031240 


012701 


001246 


6064 


031244 


012737 


031334 


6065 


031252 


170164 


000004 


6086 


031256 


170261 


177700 


6067 


031262 


020427 


001136 


6086 


031266 


001403 




6089 


031270 


104000 




6090 


031272 


000454 




6091 


031274 


002013 




6092 








6093 


031276 


020127 


001246 


6094 


031302 


001403 





15 -MAR -84 
TlOO 

001136 
001142 



16:58 PAGE 115 

TEST LOFPS, STFPS MODE 5 



SEQ 0115 



001146 
000244 



1«! 



147501 21: 



MOV 

MOV 

MOV 

MOV 

MOV 

LOFPS 

STFPS 

CMP 

BEQ 

ERROR 

.WORD 

.WORD 

CMP 

BEQ 

ERROR 

.UORO 

.WORD 

CMP 

BEQ 

ERROR 

.UORO 

.UORO 



♦TSTL0C»4.MTSTL0C 

«1475O1.0«TSTLOC*4 

•TSTL0C*12.R1 

#RECST.8«TSTL0C*10 

♦lOI.MFPVEC 

S-(R4) 

8-(Rl) 

R4.«TSTL0C 

II 

450 
FPPERR 

R1.#TSTL0C»10 * 
21 



451 

FPPERR 

0«RECST.«1475O1 
31 

452 

FPPERR 



iTSTLOC- DEFERRED ADDRESS 
I SETUP EXPECTED STATUS 
iRl POINTS TO 412 

I SET DEFERRED BUFFER FOR RECEIVED STATUS 

I SETUP TRAP VECTOR 

i*TEST INSTRUCTION 

i*TEST INSTRUCTION 

(VERIFY R4 

I BRANCH IF GOOD 

■ALL ERRORS TO TRAP TO EMT VECTOR 

I UNIQUE ERROR NUMBER 

I ADDRESS OF ERROR MESSAGE 

I VERIFY Rl 

I BRANCH IF GOOD 

I ALL ERRORS TO TRAP TO EMT VECTOR 
I UNIQUE ERROR NUMBER 
I ADDRESS OF ERROR MESSAGE 



wIMP 3 1 
I UNEXPECTED TRAP 



101: 



31: 



nLS6: 



MOV 
MOV 
ERROR 
.UORO 
.UORO 



CSP)».R0 
(SP)».R5 

453 
FPPCRR 



I BAD Rl 

I VERIFY STATUS 
I BRANCH F GOOD 

I ALL ERRORS TO TRAP TO EMT ^/ECTOR 
I UNIQUE ERROR NUMBER 
I ADDRESS OF ERROR rCSSAGE 
tBAO STATUSV 

tGET OVER TRAP 

iSAVE PC 
I SAVE PS 

J ALL ERRORS TO TRAP TO EMT VECTOR 
I UNIQUE ERROR NUMBER 
lAOOf^SS OF ERROR MESSAGE 
I UNEXPECTED TRAP 



i*TEST 
TSTlOl: 



101 



TEST LOrPS. STFPS MODE 6 



001142 
000244 



It: 



INC 


ITESTN 


(INCREMENT TEST NUMBER 


MOV 


#TSTL0C.R4 


(POINT R4 TO RAM 


MOV 


«140001.B*TSTLOC*4 


iSETUP EXPECTED STATUS 


MOV 


♦TSTL0C»110.R1 


tRl UILL POINT TO TESTL0C*10 


MOV 


•lOI.MFPVEC 


(SETUP TRAP VECTOR 


LDFPS 


4(R4} 


{•TEST INSTRUCTION 


STFPS 


-100(R1> 


(*TEST INSTRUCTION 


CMP 


R4.*TSTL0C 


(VERIFY R4 


BEQ 


It 


(BRANCH IF GOOD 


ERROR 




(ALL ERRORS TO TRAP TO EMT VECTOR 


.UORO 


454 


(UNIQUE ERROR NUMBER 


.UORD 


FPPERR 


(ADDRESS OF ERROR MESSAGE 


CMP 


Rl.mTLOC»llO ' 


(VERIFY Rl 


BEQ 


2t 


(BRANCH IF GOOD 



GLOBAL AREAS 
KDJllA.MAC 



MACtll 50A(1052) 
15-MAR-84 15:51 



15 -MAR 84 
TlOl 



16: 



STFPS MODE 



SEQ 0116 





vox 








6096 


031506 


000455 






6097 


0S1310 


002013 






6096 










6099 


031312 


023727 


001146 


140001 


6100 


031320 


001412 






6101 


031322 


104000 






6102 


031324 


000456 






6103 


031326 


002013 






6104 










6105 


031330 


000167 


000012 




6106 










6107 


031334 


012600 






6108 


031336 


012605 






6109 


031340 


104000 






6110 


031342 


000457 






6111 


031344 


002013 






6112 










6113 


031346 








6114 










6115 










6116 


031346 








6117 










6118 










6119 










6120 


031346 








6121 


031346 


005267 


147432 




6122 


031352 


012704 


001236 




6123 


031356 


012737 


001142 


001136 


6124 


031364 


012737 


145501 


001142 


612S 


031372 


012701 


001046 




6126 


031376 


012737 


001146 


001140 


6127 


031404 


012737 


031474 


000244 


6128 


031412 


170174 


177700 




6129 


031416 


170271 

A ■ VC* ■ & 


000072 




6130 


031 422 


020427 


001236 




6131 


031426 


001403 






6132 


051430 


104000 






6133 


031432 


000460 






6134 


031434 


002013 






6135 










6136 


031436 


020127 


001046 




6137 


031442 


001403 






6133 


031444 


104000 






6139 


031446 


000461 






6140 


031450 


002013 






6141 










6142 


031452 


023727 


001146 


145501 


61«3 


031460 


001412 






ol44 


031462 


104000 






6145 


031464 


000462 






6146 


031466 


002013 






6147 










b!48 


031470 


000167 


000012 




6149 










615C 


031474 


012600 







ERROR 
.UORD 
.UORD 

2$; CMP 
BEQ 
ERROR 
.UCRO 
.UORD 

JMP 

(UNEXPECTED TRAP 



455 
FPPERR 

(BAD Rl 
S«TSTLOC * 10 . «140001 
31 



J ALL ERRORS TO TRAP TO EMT VECTOR 

I UNIQUE ERROR NUMBER 

i ADDRESS or ERROR MESSAGE 



10$: 



3t: 



MOV 
MOV 
ERROR 
.UORO 
.WORD 



456 
FPPERR 

3$ 

(SP)».RO 
(SP)».R5 

457 

FPPERR 



J VERIFY STATUS 
i BRANCH F GOOD 
(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 
(BAD STATUSN 

(GET OVER TRAP 

(SAVE PC 
(SAVE PS 

(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 
(UNEXPECTED TRAP 



MLS7: 

UtEST 102 
TST102: 

INC 

nov 

NOV 

NOV 

NOV 

NOV 

NOV 

LOFPS 

STFPS 

CMP 

BEQ 

ERROR 

.WORD 

.UORD 



TEST LOFPS, STFPS HOOE 7 



II: 



2S: 



CMP 

BEQ 

ERROR 

.WORD 

.WORD 

CHP 

BEQ 

ERROR 

.MORD 

.WORD 

JMP 



•TESTN 

•TSTL0C*100.R4 
•TSTL0C«4.8»TSTLCC 
•14SS01.8*TSTLX*4 
#TSTL«-70.Rl 
•TSTLM * 10. MTSTLX *2 
•lOt.StFPVCC 
S-100CR4) 
S72(RI) 

R4.*TSTL0C*100 
II 

460 
FPPERR 

Rl.#TSTL0C-70 * 
2« 

461 

FPPERR 

(BAD Rl 
8*TSTUOC>10,*145S01 
St 



(INCREMENT TEST NUMBER 
(POINT R4 TO RAM 
(TSTLOC- DEFERRED ADDRESS 
(SETUP EXPECTED STATUS 
iRl POINTS TO TSTLXaO 

! SETUP TRAP VECTOR 

t*TEST INSTRUCTION 
(*TEST INSTRUCTION 
(VERIFY R4 
(MMNCH IF GOQO 

(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUI^R 
(ADDRESS OF ERROR MESSAGE 

(VERIFY Rl 
(BRANCH IF GOOD 

(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 



462 

FPPERR 

3) 



(BAD 



(UNEXPECTED TRAP 
10»: MOV (SP)».RO 



(VERIFY STATUS 
(BRANCH F GOOD 

(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 

STATUSV 

(GET OVER TRAP 

(SAVE PC 



N9 

GLOBAL AREAS MACYll 30A(1052) 15 MAR -84 16:58 PAGE 117 

KOJllA.MAC 15-MAR-84 15:51 T102 TEST LOFPS. STFPS MODE 7 







oi ?f>OS 

VXCUW J 






liov 


(SP1» R5 


tSAVE PS 






051 SOO 


104000 
X wv 






ERROR 




■ALL ERRORS TO TRAP TO EMT 






O^l SAP 


0A046^ 






. UORO 


463 


iUNTQUF ERROR NUMRFR 




6154 


031504 


OO201S 






iuORD 


FPPERR 


1 ADDRESS OF ERROR M'^SSAGE 


















1 UNEXPECTED TRAP 












3t: 










6157 




































V 7 








nLDC2: 










6160 








1 1 ******************************** *******•••***•********«*«**««** 












t*TEST 


103 


TEST LOCLD MODE 


27 




6i6P 


















6163 


031506 






TST103: 










6164 


031506 


005267 


147272 

X^ ■ & • & 




INC 


> I'ESTN 


1 INCREMENT TEST NUMBER 




6165 


031512 


005001 

W J wx 






CLR 


Rl 


iINIT Rl 




6166 


031514 


012704 


007700 




MOV 


«7700.R4 


tFPS'OOUBLE, LONG 




6167 


031520 


170104 






LDFPS 


R4 


1 




6168 


031522 


012737 


0S1S62 000244 




MOV 


«10t.8«fPVEC 


(SETUP WILD TRAP 




6169 


031530 


177027 






LDCLD 


CR7)».AC0 


(•TEST INSTRUCTION 




6170 


031532 


005201 






INC 


Rl 


1 




6171 


031534 


005201 






INC 


Rl 


( 




6172 


031536 


005201 






INC 


Rl 


( 




6173 


031540 


005201 






INC 


Rl 


1 




6174 


D31542 


020127 


000003 




CfiP 


Rl,«3 


(VERIFY 




6175 


031546 


001412 






BEQ 


1» 


(BRANCH IF GOOD 




6176 


0 • 1550 


104000 

XW^ vw 






ERROR 




(ALL ERRORS TO TRAP TO EMT 


VECTOR 


6177 


031.552 


000464 






.WORD 


464 


(UNIQUE ERROR NUMBER 




6178 


OS 'l 554 


002013 






.WORD 


FPPERR 


(ADDRESS OF ERROR MESSAGE 




6179 














(INSTRUCTION FAILED 




6180 


031556 


000167 


000012 




JMP 


It 


(JUMP OVER WILD TRAP 




6181 


0 J 1562 


012600 




10*: 


HOV 


(SP)»,RO 


(SAVE PC 




6182 


031564 


012605 






MOV 


CSP)».RS 


(SAVE PS 




6183 


031566 


104000 






ERROR 




(ALL ERRORS TO TRAP TO EMT 


VECTOR 


6184 


031570 


000465 






.WORD 


465 


(UNIQUE EfmOR NUMKR 




6165 


031572 


002013 






.WORD 


FPPERR 


(ADDRESS OF ERROR MESSAGE 




6166 














tUILO TRAP ON INSTRUCTION 




6187 


031574 


012704 


001266 

wxc w 


It: 


nov 


♦TA86A.R4 


(POINT TO EXPECTED DATA 




6186 


031600 


012701 


001126 




NOV 


♦RECOST.Rl 


t POINT TO DATA BUFFER 




6169 


031604 


174011 






STD 


ACO.CRl) 


(VERIFY DATA 




6190 


031606 


004767 


150334 




JSR 


R7.DATVER 


> 




6191 


031612 


005767 


147222 




TSI 


COUNT 






6192 


C31616 


001403 






BEQ 


21 


(BRANCH IF GOOD DATA 




6193 


031620 


104000 






ERROR 




(ALL ERRORS TO TRAP TO EMT 


VECTOR 


6194 


031622 


000466 






.WORD 


466 


(UNIQUE ERROR NUMBER 




6195 


031624 


002013 






.UORO 


FPPERR 


(ADDRESS OF ERROR MESSAGE 




6196 














iBAO DATA 




6197 


031626 






21: 










6198 


















6199 


















6200 


















6201 


031626 






HLCF: 










6202 


















6203 








;*TEST 


104 


TEST LOCIF. LOCLF 




6204 








TST104: 










6205 


031626 














6206 


031626 


005267 


147152 




INC 


•TESTN 


1 INCREMENT TEST NUMBER 





GLOBAL ARC AS NAC>11 3.')A(10S<>) 15 HAR 64 16:5B PAGE 116 
KOJllA.MAC 64 15:51 T104 TEST LDCir, LDCLF 



b207 








il/INT-0 




6^ 


031632 


004767 


000 500 


JSR 


R7.LCFSUB 


6209 


031636 


000000 


000<X>0 


.WORD 


0.0 


6210 


031642 


ooococ 


CCCCOO 


.WORD 


0,0 


6211 


031646 


000000 




.WORD 


0 


6212 


031650 


000004 




.WORD 


4 


621S 








12/INT-O. -1 




6214 


031652 


004767 


000460 


JSR 


R7,LCFSUB 


6215 


031656 


000000 


177777 


.WORD 


0. 1 


6216 


031662 


000000 


000000 


.UORO 


0,0 


6217 


031666 


007440 




.WORD 


7440 


6216 


031670 


007444 




.WORD 


7444 


6219 








(S/LONG-0 




6220 


031672 


004767 


000440 


JSR 


R7.LCFSUB 


6221 


031676 


000000 


000000 


.UORO 


0.0 


6222 


031702 


000000 


000000 


.UORO 


0.0 


622S 


031706 


000100 




.UORO 


100 


6224 


031710 


000104 




.UORO 


104 


6225 








t4/INT>4000C 




6226 


031712 


004767 


000420 


JSR 


R7.LCFSUB 


6227 


031716 


040000 


000000 


.UORO 


40000.0 


6228 


031722 


043600 


000000 


.UORO 


43600.0 


6229 


031726 


000017 




.UORO 


17 


6230 


031730 


000000 




.WORD 


0 


6231 








i5/L0NG-l 




6232 


031732 


004767 


000400 


JSR 


R7.LCrSUB 


6233 


031736 


000000 


OOOOOl 


.UORO 


0.1 


6234 

6235 


031742 


040200 


000000 


.UORO 


40200.0 


031746 


000117 




.UORO 


117 


6236 


031750 


000100 




.UORO 


100 


6237 








|6/INT -PATTERN 




6236 


031752 


004767 


000360 


JSR 


R7.LCrsue 


6239 


031756 


000252 


025252 


.UORO 


252.25252 


6240 


031762 


042052 


000000 


.UORO 


42052.0 


6241 


031766 


000000 




.UORO 


0 


6242 


031770 


000000 




.UORO 


0 


6243 








1 7/ IN' --40000 




6244 


031772 


004767 


000340 


JSR 


R7.LCFSUB 


6245 


031776 


140000 


000000 


.UORO 


-40000.0 


6246 


032002 


143600 


000000 


.UORO 


14S600.0 


6247 


032006 


000007 




.UORO 


7 


6248 


032010 


000010 




.UORO 


10 


6249 








I8/INT--1 




6250 


032012 


004767 


000320 


JSR 


R7.Lcrsue 


6251 


032016 


177777 


OOOOOO 


.UORO 


-1.0 


6252 


032022 


140200 


000000 


.UORO 


140200.0 


6253 


032026 


000007 




.UORO 


7 


6254 


032030 


000010 




.UORO 


10 


6255 








1 9/ INT •PATTERN 




6256 


032032 


004767 


000300 


JSR 


R7.LCFSUe 


6257 


032036 


125252 


125252 


.WORD 


12S2S2.12S2S2 


6258 


032042 


143652 


126000 


.UORO 


14S6S2. 126000 


6259 


032046 


000007 




.UORO 


7 


6260 


032050 


000010 




.UORO 


10 


6261 








ilO/LONG -40000 




6262 


052052 


004 767 


000260 


JSR 


R7.LCFSUB 



SEQ 0118 



lOO TEST 

iFSRC 
(RESULT 
I TEST FPS 
•RESULT TPS 

I 00 TEST 

iFSRC 
I RESULT 
I TEST FPS 
I RESULT FPS 

lOO TEST 

iFSRC 
I RESULT 
I TEST FPS 
I RESULT FPS 

I 00 TEST 

iFSRC 
iRESULT 
I TEST FPS 
I RESULT FPS 

iDO TEST 

iFSRC 
{RESULT 
I TEST FPS 
•RESULT rps 

lOO TEST 

iFSRC 
iRESULT 
I TEST FPS 
{RESULT FPS 

lOO TEST 

iFSRC 

{RESULT 
{ TEST FPS 
{RESULT rPS 

lOO TEST 

{FSRC 

(RESULT 
{ TEST FPS 
{RESULT FPS 

{00 TEST 

{FSRC 

{RESULT 

( TEST FPS 

{RESULT FPS 

{00 TEST 



KOJllA.MAC 15 MAR ^4 



IS MAR^JJ^ 



16: 



^1 



ST 



LDCLF 



SEO 0119 



b263 

6264 

6265 

6266 

6267 

6266 

6269 

6270 

6271 

6272 

6275 

6274 

6275 

6276 

627 7 

6276 

6279 

6260 

6281 

6262 

626S 

62A4 

6265 

6266 

6287 

6288 

6289 

6290 

629 

6292 

6293 

6294 

6295 

6296 

6297 

6298 

6299 

6300 

6301 

6302 

6503 

6304 

6505 

6306 

6307 

6308 

6509 

6510 

6511 

6512 

6515 

6514 

6515 

6516 

6517 

6518 



052056 
052062 
052066 
052070 

052072 
052076 
052102 
052106 
052110 

052112 
032116 
052122 
052126 
052150 

052132 
032136 
032142 
032146 
032150 

032152 
052156 
032162 
052166 
032170 

052172 
052176 
052202 
032206 
052210 

052212 
052216 
052222 
052226 
052230 

052252 
052236 
032242 
052246 
052250 

052252 
052256 
052262 
052266 
052270 

052272 
032276 
032302 



040000 
04 7600 
000117 
000100 

004 767 
000000 
040200 
007557 
007540 

004767 
000000 
042052 
007557 
007540 

004767 
140000 
147600 
000107 
000110 

004767 
177777 
140200 
007500 
007510 

004767 

125252 
147652 
000105 
000110 

004767 
OllT'l 
047777 
000117 
000100 

004767 
040000 
047600 
007502 
007500 

004767 
040000 
047600 
007557 
007540 

004767 
100000 
144000 



000000 
000000 



000240 
000001 
000000 



000220 
000252 
000000 



000200 
000000 
000000 



000160 
177777 
000000 



000140 

125252 
125255 



000120 
177500 
177777 



000100 
000100 
OCOOOl 



000060 
000100 
000000 



000040 
000000 
000000 



.WORD 
.WORD 
.WORD 
.WORD 

ill/LONC«l 
JSR 
.WORD 
.WORD 
.WORD 
.WORD 

a2/L0NG-PATTERN 



40000.0 
47600,0 
117 
100 

R7,LCFSUB 
0.1 

40200.0 
7557 
7540 



JSR 
.UORC 
.UORO 
.WORD 
.UORO 



115/LONC - -40000 



R7.LCFSUB 
0.252 
42052.0 
7557 
7540 



JSR 
.UORO 
.WORD 
.WORD 
.WORD 
I14/L0NC--1 
JSR 
.UORO 
.UORO 
.WORD 
.UORO 
1 15/LONC -PAT TERN 



R7.LCrSUB 
-40000,0 
147600.0 
107 
110 

R7.LCrSUB 
-I. -I 
140200.0 
7S00 
7510 



JSR R7.LCrSUB 

.UORO 125252.125252 

.UORO 147652. 12S255 

.UORO 105 

.UORO 110 



I 16/L0NC-77777. 177500 



JSR R7.LCrSUB 

.UORO 77777.177500 

.WORD 47777,177777 

.UORO 117 

.UORO 100 



I17/LOHG-40000.100 



JSR 
.UORO 
.UORO 
.UORO 
.UORO 



R7,LCFSUB 
40000.100 
47600.1 
7502 
7500 



il8/LONG«40000.100 • TRUNCATC 
JSR R7.LCFSUB 



.UORO 
.UORO 
.UORO 
.UORO 
1 19/ INT- HOST 
JSR 
.UORO 
.UORO 



40000,100 
47600.0 
7557 
7540 
NEGATIVE 
R7.t.CrSUB 
100000.0 
144000.0 



jfSRC 
|RE5 



■SULT 
I TEST TPS 
iRESULT FPS 

I 00 TEST 

iFSRC 
iRESULT 
I TEST FPS 
{RESULT FPS 

lOO TEST 

iFSRC 
iRESULT 
I TEST FPS 
iRESULT FPS 

lOO TEST 

iFSRC 

iRESULT 

I TEST FPS 

iRCSULT FPS 

iDO TEST 

IFSRC 

{RESULT 
I TEST FPS 
iRESULT FPS 

tOO TEST 

iFSRC 

•RESULT 

I TEST FPS 

iRESULT FPS 

lOO TEST 

iFSRC 

iRCSULT 

I TEST FPS 

{RESULT FPS 

lOO TEST 
iFSRC 

iRESULT 
I TEST rps 
iRCSULT FPS 

lOO TEST 
iFSRC 

iRESULT 
I TEST FPS 
iRESULT FPS 

lOO TEST 

iFSRC 

iRESULT 



KOJllA.MAC 



MAC* 1 1 SOACIOW) 
15 HAR 84 15:31 



IS MAR 64 
T104 



16:50 PACE 120 

TEST LOCir, LDCLF 



SEQ 0120 



t)3l9 
63^0 
6321 
6322 
6323 
6324 
6325 
6326 
6327 
6328 
6329 
6330 
6331 
6332 
6333 
6334 
6335 
6336 
6337 
6338 
6339 
6340 
6341 
6342 
6343 
6344 
6345 
6346 
6547 
6348 
6349 
6350 
6351 
6352 
6353 
6354 
6355 
6356 
6357 
6358 
6359 
6360 
6361 
6362 
6363 
6364 
6365 
6366 
6367 

6369 
6370 
6371 
6372 
6373 
6374 



032306 
032310 

052312 
032316 
032322 
032326 
032330 



000007 
000010 

004767 
100000 
150000 
000107 
000110 



000020 
000000 
000000 



.WORD 7 

.UORO 10 

120/LONG" HOST NEGATIVE 

JSR R7.LCFSUB 

.WORD 100000.0 

.WORD 150000.0 

.WORD 107 

.WORD 110 



032332 000167 000126 



032336 
032340 
032346 
032352 
032356 
032360 



012602 
012737 
012701 
016200 
170100 
010204 



032362 177014 



032364 
032366 
032372 
032374 
032376 
032402 
032404 
032406 
032410 
032412 

032414 

032416 
032422 
03242:6 
032432 
032454 
032436 
032440 



170203 
012700 
170100 
174011 
016200 
020003 
001403 
104000 
000467 
002013 

010204 
062704 
004 767 
005767 
001403 
104000 
000470 
002013 



HOP 18 



I TEST FPS 
iRESULT FPS 

lOO TEST 

iFSRC 

•RESULT 

I TEST FPS 

I RESULT FPS 



I GET OVER SUBROUTINE 



*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*)( 

*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x«x«x*x«x«x 

LDCIF. LOaF 

FSRC 
RESULT 

FPS BEFORE EXECUTION 
FPS AFTER EXECUTION 

NO TRAP CAN OCCUR 

*X*X*X*X*X*X*X*X«X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X«X*X*X«X 
*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X«X*X*X*X*X*X*X*X*X*X*X*X 



032446 000244 

001126 

000010 



LCFSUB: NOV 
NOV 
NOV 
NOV 
LOFPS 
NOV 



(SP)*.R2 

•50f,B«FPVEC 

«REC0ST.R1 

10CR2).RO 

RO 

R2.R4 



40«; 



LDCIF CR4).AC0 



000200 
000012 



J VERIFY STATUS 
21: STFPS 
NOV 
LOFPS 
STD 
NOV 
CMP 
BEQ 
ERROR 
.UORO 
.UORO 



000004 
147502 
146406 



3»: 
4t: 



NOV 

ADO 

JSR 

TST 

BEQ 

ERROR 

.UORO 

.UORO 



RS 

#200. RO 
RO 

ACO.(Rl) 
12CR2).R0 
R0.R3 
St 

467 
FPPERR 

R2.R4 
•4.R4 

R7,0ATVFR 

COUNT 

SI 

470 
FPPERR 



I RETURN ADDRESS TO USE AS POINTER 
iRCOZRECr TRAP VECTOR 
iPOINT TO RESULT AREA 
iCCT TEST FPS 
tLOAD TEST FPS 
iPOINT TO TEST DATA 

l*TEST INSTRUCTION C ACCORDING TO HODE) 



I SAVE FPS 

iSET FPP STATUS TO DOUBLE 

I SAVE TEST RESULT INTO RECOST 

iGET EXPECTED STATUS 
•VERIFY STATUS 
iBRAICH IF GOOD 

I ALL ERRORS TO TRAP TO ENT VECTOR 
lUNIQUE ERROR NUNBER 
I ADDRESS OF ERROR HESSAGE 



iBAD FPS 



I BAD ACO 



iPOINT TO EXPECTED DATA 

t VERIFY DATA 
(BRANCH IF GOOD 

I ALL ERRORS TO TRAP TO ENT VtCTO« 
t UNIQUE ERROR NUNBER 
•ADDRESS OF ERROR HESSAGE 



t I 'J 



bLOBAL AREAS 
KOJllA.HAC 



MACni 50Ail05^) 
IS MAR 64 15:51 





052442 


AAA t A. ^ 


A A A A 1 A 

000014 










i 1 T T 

DO/ ' 








65 7o 


AS Id 

052446 


A « AA 




65 ''t 




A 1 

U126UD 




65oO 


032*52 


« AAA 




65oI 


0324D4 


0004 / I 




6592 


032456 


AA'iAt 

002015 




0595 








650* 


03«460 


A/%/\t 7 

OOvi6 ' 


1 7 7 7t;.C 


VAC 


03^464 






^ VA£ 








£ V A 7 

65o ' 


O324o4 






6590 








^ VflO 

65o># 








65'tO 








D5't1 


U3c404 






65^F^ 


03<:404 


AA'^Dil 7 
UUDcO ' 


1 Ai^Xl A 


65^5 








05*** 


y3c4 /O 


rO ' 




65>#D 


f 4 


UUUVW 


lAAAAA/ 


O5"»o 


A VOQAA 

U3c5UU 


A/vW\A 


AAAAAA 




U3c5V>0 


A/WVV\ 
\AJ\JU\AJ 






A A 
U3c51U 


W r 5l,0 




D57^ 


U3^3le 














o**u I 


03^514 


7^7 
W>4 f O / 


AAA OA A 




ATOCiA 

U3<:5^ 


A/\A/\/\A 


AAA/^A t 




032524 


Ad AOAA 

040200 


AAAAAA 

oooooo 




U3<f53< 


OOOOOO 






U3«;534 


OO f l^f 












O^U f 










ATO^^A 

03«;540 


OQ4 ^6 / 


OOW214 




ATO^AA 
03cD44 


U4QUUU 


1 77777 




ATOCQA 

U32550 


A^ V£ AA 


AAAAAA 
OOOOOO 


1 1 










U3e3eu 


AA7^t 7 








AA 7^LAA 

OO rOOO 




O** l.*t 








£J1 1 ^ 
ID 


ATO^JL^ 
03^304 


AAA 7£. 7 


A^^i 7A 

OOOI fO 


£^ 1 A 


AX^<7A 


1 A AA^^ 


1 77777 
L / f f f f 


1 f 


A'*0^7^ 
U3£3'4 


1 A »^ AA 

145600 


AAAAAA 

OOOOOO 


AA 1 A 




UUUWU 








AA7JLAA 








UUf 61U 














U3eoiU 


AAA7iL7 


AAAl AA 




U^cO 14 


AAAAAA 


AAAAAA 








A/W%AAA 






AAAAAA 








nft77S7 




6427 


032632 


007740 




6428 








6429 


032654 


004767 


000120 


6430 


032640 


000000 


000001 



IS riAR 84 
T104 

St: 



lb 



sea 0121 



JMP 



14(R2) 



I INSTRUCTION TRAPPED 



50»i 



H0P18: 

MLCO: 



HOV 
MOV 
ERROR 
.WORD 
.WORD 

JMP 



(SP)..«0 
(SP)».RS 

471 

FPPERR 
51 



I RE TURN TROM TEST 



I SAVE PC 
I SAVE PS 

I ALL ERRORS TO TRAP TO EMT VECTOR 
I UNIQUE ERROR NUMBER 
I ADDRESS OF ERROR MESSAGE 
(INSTRUCTION UASNT SUPPOSE TO TRAP 
I CONTINUE 



IItEST 105 
TS'105: 



TEST LOCIO. LOCLD 



OOOOOO 



OOOOOO 



OOOOOO 



OOOOOO 



OOOOOO 



INC 


ITESTN 


(INCREMENT 


l/LONG-0 






JSR 


R7,LCOSUe 


iDO TEST 


.UORO 


0.0 


(FSRC 


.UORD 


0.0.0.0 


(RESULT 


.UORO 


7315 


{ TEST FPS 


.UORO 


7304 


(RESULT FPS 


ic/INT-O 






JSR 


R7,LC0SUB 


lOO TEST 


.UORO 


0.1 


(FSRC 


.UORO 


40200.0.0.0 


{RESULT 


.UORO 


7757 


( TEST FPS 


.WORD 


7740 


(RESULT FPS 


|3/INT-40000 






JSR 


R7.LC0SUB 


(DO TEST 


.UORO 


40000.-1 


(FSRC 


.UORO 


43600.0.0.0 


(RESULT 


.UORO 


7617 


( TEST FPS 


.UORO 


7600 


(RESULT FPS 


|4/INT* -40000 






JSR 


R7.LCOSUe 


(00 TEST 


.UORD 


-40000. -t 


iFSRC 


.UORO 


143600.0.0.0 


(RESULT 


.UORD 


7600 


1 TEST FPS 


.UORO 


7610 


(RESULT FPS 


i5/LONG-40000 






JSR 


R7.LC0SUS 


tOO TEST 


.UORO 


40000.0 


trsRC 


.UORO 


47600.0.0.0 


(RESULT 


.UORD 


7757 


1 TEST FPS 


.UORD 


7740 


(RESULT FPS 


t6/L0NC'l 






JSR 


R7,lC0SUB 


lOO TEST 


.UORO 


0.1 


(FSRC 



KDJllA. 

6431 
6432 
6455 
6434 
6455 
6456 
6437 
6430 
6439 
6440 
6441 
6442 
6443 
6444 
6445 
6446 
6447 
6448 
6449 
6450 
6451 
6452 
6455 
6454 
6455 



AREAS 
MAC 

052644 

032652 
052654 
032656 

032660 
032664 
032670 
032676 
032700 
032702 

032704 
052710 
052714 
052722 
052724 
052726 

052730 
052754 
052740 
032746 
052750 
052752 



MAC Ml 50A(1052) 
15 MAR -84 15:51 



15 



MAR 64 
T105 



16 



6456 
6457 
6456 

6459 052754 
6460 
A461 
6«62 
6465 
6464 
6465 
6466 
6467 
6468 
6469 
6470 
6471 
6472 
6475 



040200 
000000 
000500 
000300 

004767 
177777 
140400 
000000 
007500 
007310 

004767 
125456 
145661 

000000 
000200 
000210 

004767 
125252 
147652 
000000 
000500 
000510 



000167 000126 



000000 000000 



000074 
177776 

000000 000000 



000050 
176545 

122000 000000 



000024 

125252 

125252 126000 



TEST LDCID. LOCLD 




.WORD 


40200,0.0,0 


1 RESULT 


.WORD 


500 


1 TEST FPS 


. UORD 


500 


1 RESULT FPS 


■-2 

JSR 


R7,LCDSUe 


iDO TEST 


.WORD 


-1.-2 


iFSRC 


.WORD 


140400 .0,0,0 


(RESULT 


.WORD 


^ VMM 

7500 


i TEST FPS 


.WORD 


7510 


1 RESULT FPS 


PATTERN 






JSR 


R7.LC0SUB 


lOO TEST 


.WORD 


125456, 176545 


iFSRC 


.WORD 


145661 , 122000 , 0 


.0 iRESULT 


.WORD 


200 


1 TEST FPS 


ft tJMM% 


210 


1 RESULT FPS 


•PATTERN 






JSR 


R7.LC0SUB 


lOO TEST 


.UORO 


125252.125252 


iFSRC 


.WORD 


147652.125252.126000.0 iRESULT 


.WORD 


500 


1 TEST FPS 


.UO(K> 


510 


{RESULT FPS 


JMP 


M0P19 


iGCT OVER SUBROUTINE 



SEQ 0122 



•x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x 

LOCIO. LOCLO 

FSRC 
RESULT 

FPS BEFORE EXECUTION 
FPS AFTER EXECUTION 

NO TRAP CAN OCCUR 

•X*X*X*X*X*X*X*X*X*X*X*X*XttX*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X 

*x*x*x*x*x*x*x*x*x*x*x*x«x*x*x«y*x*x*x*x*x*x*x*x*x*x*x*x*x 



6474 


032760 


012602 




LCOSUB: 


MOV 


CSP)».R2 


6475 


052762 


012757 


055070 000244 




NOV 


•50I,B«FPVEC 


6476 


032770 


012701 


001126 




lov 


•RECOST.Rl 


6477 


032774 


016200 


000014 




MOV 


14CR2).R0 


6478 


055000 


170100 






LOFPS 


RO 


6479 


053002 


010204 






NOV 


R2.M 


6480 














6461 


035004 


177014 




40(: 


LOCIO 


(R4).AC0 


6482 








IvERIFr 






6483 








STATUS 




6484 


033006 


170203 




2t: 


STFPS 


R3 


6485 


053010 


012700 


000200 




MOV 


•200.ro 


6486 


055014 


17C100 






LOFPS 


RO 



I RETURN ALORESS TO USE AS POINTER 

iREOIRECT TRAP VECTOR 

tPOINT TO RESULT AREA 

iGET TEST FPS 

iLOAO TEST FPS 

iPOINT TO TEST DATA 

l*TEST INSTRUCTION (ACCORDING TO MODE i 



I SAVE FPS 

I SET FPP STATUS TO DOUBLE 
i 



GLOBAL AREAS 
KDJllA.MAC 



MACUl 30A(105^) 
IS -MAR 84 iS:51 



IS MAR 64 16:S8 
TIOS 11 



ST^'tS^lif^LOCLO 



SEQ 0125 



t»487 
6466 
6489 
6490 
6491 
6492 
649S 
6494 
64 9S 
6496 
6497 
6496 
6499 
6500 
6S01 
6S02 
6S05 
6504 
6505 
6506 
6507 
6508 
6509 
6510 
6511 
6512 
6515 
6514 
651S 
6516 
6517 
6518 
6519 
6520 
6521 
6522 
6523 
6524 
6525 
6526 
6527 
6528 
6529 
6530 
6331 
65J2 
6533 
6534 
6535 
6536 
6537 
6538 
6539 
6540 
6541 
6542 



033016 
053020 
053024 
033026 
033030 
033032 
033034 

035056 
053040 
035O44 
0530S0 
0330S4 
033056 
033060 
033062 



033070 
033072 
033074 
033076 
033100 



033106 
033106 

033112 
033116 
033122 
033130 
033132 
033134 
033142 
033144 
033146 

033150 
033154 
033160 
033166 
033170 
033172 
033200 
033202 
033204 



174011 
016200 
020003 
001405 
104000 
000472 
002013 

010204 
062704 
004 767 
OOS767 
001403 
104000 
000473 
002013 



000016 



012600 
01260S 
104000 
000474 
002013 



005037 
004767 
12S4S6 
171717 
000010 
142056 
171717 
007757 
007750 

005037 
004767 
023456 
000001 
000177 
077656 
000001 
007700 
007700 



000004 
14 7076 
14S764 



033064 000162 000020 



033102 000167 177756 

033106 

033106 



005267 145672 



001042 
001140 

067012 



025252 



3»: 
4»: 



STO 


ACQ, ( Rl ) 




iSAVE TE5T RESULT INTO RECOST 


MOV 


16(R2).R0 




iGET EXPECTED STATUS 


CMP 


RO.RS 




iVERIFY STATUS 


BEQ 


31 




t BRANCH If GOOD 


ERROR 






lALL ERRORS TO TRPP TO EMT VECTOR 


.WORD 


472 




I UNIQUE ERROR NUMBER 


.WORD 


rPPERR 




1 ADDRESS or ERROR MESSAGE 






iBAD 




MQV 


R2.R4 




(POINT TO EXPECTED DATA 


ADD 


•4.R4 






JSR 


R7.DArVER 




i VERIFY DATA 


TST 


COUNT 






BEQ 


5) 




(BRANCH IF GOOD 


ERROR 






tALL ERRORS TO TRAP TO EMT VECTOR 


.WORD 


473 




t UNIQUE ERROR NUMBER 


.WORD 


FPPERR 




t ADDRESS OF ERROR MESSAGE 






tBAO 


AGO 


JMP 


20(R2) 




{RETURN FROM TEST 



5»; 



(INSTRUCTION TRAPPED 



soil 



(SP)*.RO 
(SP)*.R5 



MOV 
MOV 
ERROR 
.WORD 474 
.UORO FPPERR 



JMP 



51 



I SAVE PC 
J SAVE PS 

lALL ERRORS TO TRAP TO ENT VECTOR 
I UNIQUE ERROR NUMBER 
I ADDRESS OF ERROR MESSAGE 
I INSTRUCTION UASNT SUPPOSE TO TRAP 
{CONTINUE 



M0P19: 



HLXP: 

I i TEST 106 
TST106: 

INC tTESTN 

ii/Exp*io • m:-neg 

JSR 
.WORD 



EST LOEXP DOUBLE 



I INCREMENT TEST Nur«ER 



SfFLMG tNO INTERRUPTS 

lt7.LXPSUe iDO TEST 

12S456. 6 7012. 25252. 171717 >ACO 



067012 0252S2 



001042 
001102 
070123 



100000 



070123 100000 



. WORD 
.UORO 

.WORD 
.WORD 
I2/EXP-177 
CLR 
JSR 
.UORO 

.WORD 
.UORO 



10 lEXP 
142056.67012.2S2S2. 171717 



(RESULT 



7757 
7750 
ACO'POS 
84FL4G 
R7,LXPSUB 

23456.70123.100000,1 

177 lEXP 
77656. 70I2S. 100000. I 



I TEST FPS 
•RESULT FPS 



iNO INTERRUPTS 
lOO TEST 

lACO 



iRESULT 



.UORO 
.WORD 



7700 
7700 



I TEST FPS 
(RESULT TPS 



bLOBAi. AREAS 
KDJllA.MAC 



MACUl S0A(105£l) 15 MAR 84 16:55 PAGE 124 
15 MAR 64 15:51 T106 EST LOExP DOUBLfc 



SEQ 0124 



6543 
6544 
6545 
6546 
6547 
6548 
6549 
6550 
6551 
6552 
6553 
6554 
6555 
6556 
6557 
6558 
6559 
6560 
6561 
6562 
6563 
6564 
6565 
6566 
6567 
6568 
6569 
6570 
6571 
6572 
6573 
6574 
657 5 
6576 
6577 
6578 
6579 
6580 
6581 
6582 
6583 
6584 
6585 
6586 
6587 
6588 
6589 
6590 
6591 
6592 
6593 
6594 
6595 
6596 
6597 
6598 



033206 
033212 
033216 
033224 
033226 
033230 
033236 
033240 
033242 

0SS244 

033250 
0332S4 
033262 
033264 
033266 
033274 
033276 
033300 

033302 
033306 
033312 
033320 
033322 
033324 
033332 
033334 
033336 

033540 
033346 
033352 
033360 
033362 
033364 
033372 
033374 
033376 
033400 

033402 
033410 
033414 
033422 
033424 
033426 
033434 
033436 
033440 
033442 

033444 
033452 
033456 



005037 
004767 
055555 
022222 
000056 
053555 
022222 
007757 
007740 

005037 
004767 
100077 
177776 
177623 
104677 
177776 
007757 
007750 

005037 
004767 
000177 
177776 
177601 
000377 
177776 
007700 
007700 

012737 
004767 
030131 
073031 
177600 
000131 
073031 
007740 
107744 
000012 

012737 
004767 
000000 
000001 
100000 
040000 
000001 
002200 
102200 
000012 

012737 
004767 
111111 



001042 
001044 
044444 



044444 



001042 
001006 
177777 



177777 



001042 
000750 
177777 



177777 



000001 
000710 
032334 



000001 
000646 
000123 



000001 
000604 
100000 



033333 
033333 



J3/EXP-56 

CLR 
JSR 
.WORD 

.WORD 
.WORD 

.WORD 
.UORO 

J4/EXP--151. ACO'UV 



8«FLAG 
R7,LXPSUB 

55555. 44444 . 33333 . 22222 



I NO INTERRUPTS 
I 00 TEST 

lACO 



56 tEXP 
53555,44444.33333.22222 iRESULT 



7757 
7740 



I TEST FPS 
•RESULT FPS 



177777 
177777 



177777 
177777 

001042 
035363 



CLR 
JSR 
.WORD 

.WORD 
.WORD 

.WORD 
.WORD 
|5/EXP- 177 
CLR 
JSR 
.UORO 

.UORO 
.UORO 

.UORO 
.UORO 

I6/EXP--200. UNDERFLOU 



9«fLAG 
R7,LXPSUe 
100077,-1. 1. 

-155 

104677,-1,-1, 

7757 
7750 

84FLAG 
R7.LXPSUB 
177,-1.-1,-2 



lEXP 



I NO INTERRUPTS 
»D0 TEST 
lACO 



I RESULT 



I TEST FPS 
I RESULT FPS 



■177 
577.-1, 



■1.-2 



I EXP 



iNO INTERRUPTS 
tOO TEST 
lACO 



iRCSULT 



7700 
7700 



I TEST FPS 
tRESULT FPS 



032334 035363 



nov 

JSR 
.UORO 

.UORO 
.UORD 

.UORO 
.UORD 
.UORO 



•l.8IFL«G 

R7 LXPSUB 
SOtSl . 52354 . SSS6S . 750S1 

•200 lEXP 
151 . S2S54 . 55365 . 75051 



I INTERRUPTS 
lOO TEST 



iHCO 
{RESULT 



001042 
000456 



000123 000456 



001042 
100000 



7740 
107744 

12 

|7/EXP«LMGEST NEGATIVE 

nOV •l.MFLAG 
JSR R7.LXPSUe 
.WORD 0.12S.4S6.1 

.UORO 100000 

.UORD 40000.123.456.1 

.UORO 2200 
.UORO 102200 
.UORD 12 
t8/EXP-.200. NEC. AGO 

NOV •l.B«FLAG 
JSR R7. LXPSUB 



I TEST FPS 
iRESULT FPS 
TEC 



lEXP 



(EXPECT INTERRUPTS 
lOO TEST 
I AGO 



iRESULT 



I TEST FPS 
(RESULT FPS 
»FEC 



.UORD 111111.100000.100000. -1 



I INTERRUPTS 
I 00 TEST 

lACO 



1 i 



GLOBAL ARtAS MACUl 50A(105^) 15 MAR 64 16:58 PAGE 125 
KOJllA.MAC IS-MAR 64 15:51 T106 EST LOEXP DOUBLE 



SEO 0125 



b599 
6600 
6601 
6602 
6603 
6604 
6605 
6606 
6607 
6606 
6609 
6t>10 
6611 
6612 
6615 
6614 
6615 
*.6l6 
t>617 
6618 
6619 
6620 
6621 
6622 
662S 
6624 
6625 
6626 
6627 
6620 
6629 
6630 
6631 
6632 
6633 
6634 
663S 
6636 
6637 
6636 
6639 
6640 
6641 
6642 
6643 
6644 
6645 

6647 
6648 
6649 

6650 
6651 
6652 
6653 
6654 



035464 
03S466 
033470 
033476 
033500 
033502 
033504 

033506 
033514 
033520 
033526 
033530 
033532 
033540 
033542 
033544 
033546 

033550 
033556 
03SS62 
033570 
033572 
033574 
033602 
033604 
033606 
033610 

033612 
033616 
033622 
033630 
033632 
033634 
033642 
033644 
033646 

033650 
033654 
033660 
033666 
033670 
033672 
033700 
033702 
033704 

033706 
033714 
033720 
033726 
033730 
033732 



177777 
17 7600 
100111 
177777 
002217 
102214 
000012 

012737 
004767 
123456 
000123 
176035 
000000 
000000 
005700 
005704 
000012 

012737 
004767 
000377 
000001 
161162 
074577 
000001 
047700 
147700 
000012 

005037 
004767 
100177 
177777 
000177 
177777 
177777 
007700 
007710 

005037 
004767 
000200 
000300 
000150 
072000 
000300 
007717 
007700 

012737 
004767 

177777 
177777 
000200 
10C177 



100000 100000 



000002 
000542 
012346 



000002 
000500 
123456 



001042 
000440 

177777 



177777 



001042 
000402 
000100 



000100 



000001 
000342 

177777 



.UOflO 200 ;EXP 
.WORD 100111,100000.100000, 1 



iRESULT 



001042 
012346 



|9/EXP' 



.UORO 2217 
.WORD 102214 
.WORD 12 

1743. riu-0 



I TEST FPS 
I RESULT FPS 
jFEC 



000000 000000 



MOV 
JSR 
.UORO 

.UORO 
.UORO 

.UORO 
.UORO 
.WORD 



«2.B«FLAG 

R7.LXPSUB 

! 23456 . 12546 . 12546 . 123 



I NO INTERRUPTS 
I 00 TEST 

lACO 



1745 
0,0,0.0 

5700 
5704 
12 



lEXP 
iRESULT 



001042 
065432 



ilO'EXP >. 16616. rXO-1 



I TEST FPS 
iRESULT FPS 
iFEC 



123456 065432 



MOV 
JSA 
.UORO 

.UORO 
.UORO 



•2.B«fLAG 

R7.LXPSUB 

377. 12S4S6. 65432.1 

-16616 lEXP 
74577. 125456.654 32.1 



I NO INTERRUPTS 
lOO TEST 

lACO 



iRESUL^ 



.UORO 
.UORO 



47700 
147700 
12 



iii/Exp-177. ACO-uNoernco vmiabLe 



I TEST rps 
•RESULT FPS 



177777 
177777 



CLR aaFLRC 

JSR RT.LXRSUB 

.UORD 100177. -l.-l.-l 

.UORO 177 

.UORO -l.-l.-l.-l 



iNO INTERRUPTS 

lOO TEST 
i«CO 



lEXP 



iRESOLT 



000200 
000200 

001042 

177777 



.UORO 7700 
.UORD 7710 
tl2/EXP>lS0 RCO-POS 

aR atrtRG 

JSR R7.LMPSUB 
.UORO 200.100.200. SOO 



I TE«iT rPS 
iRESULT rPS 

tNO P^rCRRUPT 

lOO TEST 
iRCO 



.UORD ISO lEXP 
.UORD 72000. 100.200.SOO 



iRESULT 



177777 177777 



.UORO 7717 

.UORO 7700 
(15/EXP-200. RCO-MEG 

MOV •l.ttFLAG 

JSR R7.LXPSUB 

.UORO -l.-l.-l.-l 

.UORD 200 

.UORO 100177. 1, -l.-l 



1 TEST FPS 
iRESULT rPS 



lEXP 



lOO TEST 
lACO 



iRESULT 





AREAS 


MACUl 


30«( 105^) 15 M/i 


KOJllA. 


MAC 


IS MAR 84 


13 ! 31 






U-><3 f 


1 77 77 7 










AA77A^ 






OOO 1 




1 A771 A 
XU ' f lO 








Kia »*o 


A/V^A1 A 




















A1 D 7X7 

WXc f 3 ' 


AAAAAO 


AA1 AA 3 
UV1U*C 


OOOl 


\JiS ' 30 


AAA 7^7 
W* 'O f 


/tf\AXAA 
\AA)3VA/ 




oooc 


fOc 




1 77777 


1 77 77A 
X » • ' O 




n**77rt 


1 7 7 77^ 

Lilt IJ 








AK770 


^U^AAAA 

uuu*uu 








rtX»7 7A 
UO-S If* 


AAA1 


1 77777 
X 1 f f f 1 


1 7777A 
X r ' f #0 






1 7 777^ 






ooo ' 


ATA AAA 


V* • f \A/ 






oooo 


UO^WO 


1 A 7 7ft3 
X* ' ' vc 






ooof 


AXAA1 A 








OO 'U 










OO ' 1 




Al 37X7 
VXc « O ' 


AAAAAA 


AAinA3 
vvXV*c 


OO ' c 


OTA A DA 


AAA7A7 
\A/* »0 • 


^tfV^3XA 
\AA^c30 




OO ' 3 


AXAA3A 


1 7777X 

X ' ' ' ' O 


1 77777 
X f f t ( 1 


1 7777A 
XIII f O 


JL^ 7^ 
OO ' ^ 


ATAAX3 


1 7777^ 






OO ' D 


AXAAXA 


All Al 1 
VX XVX X 






OO 'O 


AXAAU^ 
U^^VOO 




AAA^W) 


AAAAAA 


OO • ' 


AXAAAA 








OO ( o 


U j^U^O 


AM17AA 






OO 'T* 


ATAA^A 


A/^7IW^ 
UUD 'UO 






ooov 










ooox 




Al 37X7 
UXc ' O I 


A/WVWtl 
UUUUUX 


AAI AA3 


oooc 




AAA7A7 


AAA1 7A 
WAIX 'O 








Xc0*30 


UUUXWI 


Anni AA 


ooo^ 


AXAA70 


AAA3AA 






ooo^ 




A77777 

\J t r f f 1 






oooo 


U-J^W rO 


XO '030 


OOQxOV 


AAA1 AA 


AAA? 
ooo • 


AXA 1 AA 
WO* XV* 












nA7 7AA 
W » » *U 






ooo^ 


nXAl t A 


t A77^3 
XU f f 3C 






oo^fw 




/W1A1 A 






AAQ1 

oo^x 












AXA1 1 A 
vO* X X* 




/V\« /\A3 
UUxO^c 








AnA7A7 
W* fO ' 


AAA1 XA 
UUUX90 






AXA 1 ?A 
vO* Xc* 


XcO*DO 


Uc3#03 


OUU333 


OO^ J 


AXA1 \3 

^/o*xo^ 


AAAAAA 






OO »o 


AXA1 XA 
vO* XO* 








AAQ7 
OO^ ' 


AXA 1 XA 


1 ^3A^A 


023403 


U00333 


0070 


ATA1 AA 
VO* X** 


AAAAAA 






OO^yy 


AXA 1 AA 


AA7^AA 






A7<V> 


nXAl 
VO*X3w 


AA7^1 A 
\W f 3XU 






A7ni 










O » VC 


AXA1 


Al 37X7 
vXc f 3 f 


UUW/Ux 


AA3 

uum*e 


O 


flXAIfcA 
V j*XOV 


AnA7A7 
W* 1 0 » 


UUUv rO 




O ' V** 


AXA1 AA 
wO* XO* 


Anoxxx 

KAAJ030 


^W\AAA 


AAA^^I( 
UUV333 


O » VJ 


nXAl 73 


AfkAAisA 
vV\rooO 






O I \^ 


nXA 1 7A 
WO* X ' * 


X ' 'OvU 






*»707 


AXA1 7A 
WO*X » O 


OAA1 XX 


AAAAAA 


AAACiC^ 
UUU333 


A7nA 


AXA^AA 


WUOOO 






6709 


034206 


007S00 






6710 


034210 


107504 







ri06 



EST LOEXP DOUBLE 



SEQ 0126 



.WORD 7705 
.UORD 107716 
.WORD 10 
;14/EXP-400. FID 



J TEST FPS 
J RESULT FPS 
iFEC 



MOV ♦2.8#FLAl, 

JSR R7.LXPSUe 

.WORD 555. -1. 2. -3 

.UORD 400 

.WORD 40155.-1.-2. 3 

.UORD 4 7700 

.WORD 147702 

.WORD 10 



(INTERRUPT 
jDO TEST 
jACO 

lEXP 
iRESULT 



,15/EXP-llOll Flu-0 



I TEST FPS 
iRESULT FPS 
iFEC 



MOV 
JSR 
.WORD 

.WORD 
.WORD 

.WORD 
.WORD 



•0,S«FLAG 

R7.LXPSU8 
177773. 1.2.-3 

11011 
0.0.0.0 

6700 
6706 



tNO INTERRUPT 
{DO TEST 
(ACO 



lEXP 
iRESULT 



1 16/EXP-LAf)GEST POSITIVE 



I TEST FPS 
iRESULT FPS 



tlOV 
JSR 
.UORO 

.yoRO 

.UORO 
.UORO 



•l.S«rLAC 

R7.LXRSUB 

12S4S6. 100. 100.200 

77777 lEKP 
157656.100.100.200 



I INTERRUPT 
tOO TEST 

lACO 



tRESOLT 



II7/FL0ATINC 
CLR 
JSR 



7740 

107752 
10 



I TEST FPS 
iRESULT FPS 
i^CC 



••FLAG tNO INTERRUPT 

R7.LXPSgS iDC TEST 

12S4S6. 25465. 555. 444 ,ACO 



.UORO 

.UORO 
.UORD 



50 itXP 
1520S6*2S4«5. 555.444 



iRESULT 



7500 
7510 



ilS/FLOATXNG UMXRFLOU 



I TEST FPS 
I RESULT FPS 



HOV 
JSR 
.UORO 



.UORO 

.UORO 
.UORO 



•I.StTLAC 
R7.LXPSUB 
555.444.555.666 

•200 

155.444.555.666 

7500 
107504 



tEXP 



I INTERRUPT 
tOO TEST 
lACO 



iRESULT 



» TEST FPS 
{RESULT FPS 



GLOBAL AREAS 
KOJllA.MAC 



MACtll 50A(1052) 
15 -MAR -84 15:51 



15 -MAR -64 
T106 



16:58 PAGE 127 
EST LOEXP DOUBLE 



SEQ 012 7 



6711 
6712 
6715 
6714 
6715 
6716 
6717 
6718 
6719 
6720 
6721 
6722 
6723 
6724 
6725 
6726 
6727 
6728 
6729 
6730 
6731 
6732 
6753 
6734 
6735 
6736 
6737 
6738 
6739 
6740 
6741 
6742 
6743 
6744 
6745 
6746 
6747 
6746 
6749 
6750 
6751 
6752 
6753 
6754 
6755 
6756 
6757 
6758 
6759 
6760 
6761 
6762 
6763 
6764 
6765 
6766 



034212 000012 



034214 
034222 
034226 
034234 
034236 
034240 
034246 
034250 
034252 
034254 



012737 
004767 
012346 
000456 
000400 
040146 
000456 
007400 
107402 
000010 



000001 
000034 
000123 



001042 
000345 



000123 000345 



.WORD 12 I TEC 

ll9/rL0ATING OVERFLOU 

MOV »1.8«FLAG 

JSR R7,LXPSUB 

.WORD 12346,1^3,345,456 

.WORD 400 I EXP 

.WORD 40146,123,345,456 



.INTERRUPT 
I DO TEST 

lACO 



{RESULT 



. UORD 7400 
.WORD 107402 
. WORD 10 



J TEST FPS 
jRESULl FPS 
»FEC 



034256 000167 000250 



034262 
034264 
034272 
034276 
034302 
034304 
034306 
034310 
034314 
034316 

034322 
034324 
034326 



034330 
034336 
034340 
034342 
034344 



012602 
012737 
012701 
012700 
170100 
010204 
172414 
016200 
170100 
016204 

176404 

170327 
000000 



032737 
001426 
104000 
000475 
002013 



034346 000167 



034352 
034360 



032737 
001005 



JMP H0P20 iGET OVER SUBROUTINE 

*x*x*x*x«x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x«x 
*x*x*x«x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x 

LOEXP 

ACO 

EXPONENT 
RESULT 

FPS BEFORE EXECUTION 
FPS AFTER EXECUTION 
(FEC) 

*X*A*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X 
*X*X«'X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X»X*X*X 



034352 
001126 
000200 



000022 
000010 



000244 



LXPSUB: 


NOV 


(SP)».R2 


t RETURN ADDRESS TO USE AS POINTER 




NOV 


•50t.S«FPVEC 


•REDIRECT TRAP VECTOR 




NOV 


•RECOST.Rl 


1 POINT TO INSULT AREA 




NOV 


•200.ro 


iSET FPS TO OOUn.E 




LOFPS 


RO 






NOV 


R2,R4 


IpOINT TO ACO DATA 




LOO 


(R4}.AC0 


iLOAD ACO 




NOV 


22(R2).ftO 


»CET TEST FPS 




LOFPS 


RO 


iLOAD TEST FPS 




NOV 


10(R2).R4 


tPOINT TO TEST DATA 


40»: 


LOEXP 


R4.AC0 


i*TEST INSTRUCTION (ACCORDING TO MODE) 


1»: 


STST 


(PC)* 


iUAIT FOR POSSIBLE FPA TRAP. 




.UORO 


0 


1 STORE STATUS HERE 



000001 001042 



(INSTRUCTION OIONT TRAP 



000042 

000001 



BIT 
BEQ 
ERROR 
.WORD 
.WORD 

JMP 



•l.»*FLAG 
2» 

475 

FPPERR 
2t 



001042 



(INSTRUCTION TRAPPED 
sot: BIT *1.S4»FLAG 
BNE 511 



{VERIFY A NO TRAP CONDITION 
(BRANCH IF GOOD 

(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 
(INSTRUCTION SHOULD HAVE TRAPPED 
(REJOIN CODE 



(SEE IF EXPECTING A TRAP 
(BRANCH IF EXPECTING A TRAP 



GLOBAL AREAS MAO 11 50A( 105^ ) 
KOJllA.MAC 15 -MAR -84 15:51 



Liu 



6767 


054362 


104000 




6768 


034364 


000476 




6769 


034366 


002013 




6770 








6771 


034 3 70 


000167 


000020 


6772 


034374 


012604 




6773 


054376 


005726 




6774 


054400 


022704 


054324 


6775 


054404 


001405 




6776 


034406 


104000 




6777 


0544 10 


000477 




6778 


034412 


002013 




6779 








6780 








6781 








6782 








o7o3 


054414 


1 70203 




6784 


054416 


012700 


AAA'^AA 

000200 


6785 


054422 


170100 




6786 


054424 


174011 




6787 


034426 


016200 


AAAA^ A 

0000c4 


6788 


054452 


020003 




6789 


054454 


001403 




6790 


034436 


104000 




o 791 


054440 


000500 




o 792 


034442 


002013 




6 793 








o '94 


034444 


010204 




6 795 


034446 


062704 


000012 


6 796 


034452 


004767 


145470 


6797 


034456 


005767 


144556 


6 796 


054462 


001405 




6 f 99 


054464 


A A ^^^^^^ 

104000 




OOCKI 


0S4466 


000501 




6eoi 


034470 


002013 




6802 








6O03 


054472 


005737 


001042 


6O04 


034476 


001002 




6O05 


U34300 


000162 


000026 


6S06 








OoO r 


054 d04 


012704 


001106 


6oOS 


034d10 


170314 




£0/\A 

6o09 


034512 


021462 


00''026 


6oXO 


034516 


001405 




ooll 


034520 


104000 




6oI2 


034522 


000502 




6oI3 


034524 


002015 




6814 








60l3 


O545£o 


AAA • ^ 

000162 


000030 


£ O 1 £ 

6816 








Ocl7 


034532 














6819 


034532 






6820 








6821 








6822 









MAR 84 


16 • SS PAGE 128 




T106 


EST LOEXP DOUBLE 






ERROR 




lALL ERRORS TO TRAP TO EMT 




.WORD 


476 


(UNIQUE ERROR NUMBER 




.WORD 


FPPERR 


1 ADDRESS OF ERROR MESSAGE 








1 INSTRUCTION WASNT SUPPOSE TO TRAP 




JMP 


2t 


1 REJOIN CODE 


51»: 


MOV 


( SP ) * . R4 


iSEE IF PC ■ INSTRUCTION 




TST 


(SP)* 


t CLEAN UP STACK 




CMP 


«1I.R4 


1 




BEQ 


21 


1 BRANCH IF GOOD COMPARE 




ERROR 




|ALL ERRORS TO TRAP TO EMT 




.WORD 


477 


t UNIQUE ERROR NUMBER 




.WORD 


rPPERR 


1 ADDRESS OF ERROR MESSAGE 



SEQ 0128 



I PC WAS INCORRECT 



{COMMON CODE FOR TRAP AND NO 
{VERIFY STATUS 



TRAP 



2$: 



St: 
4$ ; 



STFPS 
MOV 
LDFPS 
STD 
WV 
CMP 
BEQ 
ERROR 
.WORD 
.WORD 

MOV 

ADD 

JSR 

TST 

BEQ 

ERROR 

.UORO 

.WORD 



5« 



TST 
BNE 
JMP 

{VERIFY FEC 
71: MOV 
STST 
CMP 
BEQ 
ERROR 
.UORO 
.WORD 



8«s 

H0P20s 



JMP 



RS 
•200.ro 
RO 

ACO.(Rl) 
24(R2).R0 
R0.R3 
31 

500 

FPPEIW 

R2.R4 
•12. R4 
R7.DATVER 
COUNT 
51 

501 

FPPERR 

MFLAC 
7$ 

26CR2) 

•RECFec,R4 
CR4) 

(R4>.26(R2> 
81 

502 

FPPERR 
S0(R2) 



iBAO FPS 



{SAVE FPS 
I SETUP FPS 
{FPS -200 
(GET RESULT 

I GET EXPECTED STATUS 
{VERIFY STATUS 
(BRANCH IF GOOD 

(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 

'(POINT TO EXPECTED DATA 



(BAD ACO 



{VERIFY DATA 
(BRANCH IF GOOD 

(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 

» 

(SEE IF NEED TO CHECK FEC 
(BRANCH IF NEED TO CHECK 
(ReiURN FROM TEST 



(POINT TO FEC MEA 
{SAVE FEC 

{VERIFY FEC FOR OVERFLOW 
{BRANCH IF GOOD 

{ALL ERRORS TO TRAP TO EMT VECTOR 
{UNIQUE ERROR NUMBER 
{ADDRESS OF ERROR MESSAGE 
(BAD FEC 
(RETURN FROM TEST 



MSCO: 

'{ItEST 107 



TEST STCOI. STCDL 



MiO 



GLOeAt. AREAS 
KOJllA.MAC 



MAC r 11 50AC1052) 
15 -MAR -84 15:51 



15 MAR 



STCDL 



SEQ 0129 











6824 


034532 


005267 


%AA 'ail A 

144246 


0025 








oo2o 


034536 


A AC A V ^ 

005037 


AA1 AA "a 

001042 


OOf f 


034542 


AAA T 

004 76 / 


AAAA 1 A 
000610 


OOcB 


034 d4o 


AAA1 7 7 

OOOl 7 / 


AAAAAA 

OOOOOO 


00£7 


034554 


oooooo 




OO JU 


03455O 


AAAAAA 

ouuuoo 


1 7777 7 


OoAl 


03430C 


AA7£.A A 
OO f 040 




0032 


034564 


AAT£^ A A 

007644 




0003 








00-5^ 


034 50D 


AACAT7 

00503 f 


AA1 AA O 

00104*; 


OoOS 


034^f ^ 


004 f O f 


AAAi^ilA 

OOODOO 


00.30 


O 343 f O 




1 77777 


OOO r 


054o04 


\ 77777 

X f f ( f f 




OOdO 


0340UO 


OWWOO 


OOOOOO 




034olc 


AA77AA 




iLAA/\ 
OO^O 


AT^^I A 
034014 


AA77AA 
UU f f U4 




£.AA 1 
0041 








o04<; 


034olO 


AA^AT7 


AA1 /\A O 
00l04tf 


OO^^ 


ATA^OO 

U340CC 


AAA 7il7 
\Ai4 f Of 


000300 


iLA^A 
00*H 


AlA£.OJL 

0340CO 




AAAAAA 
OOOOOO 


£.AAC 


O34o34 


AAAAAA 




OO^O 




ouuwo 


OOWOO 


OO^ 1 


Uo4C»4<f 






OO^O 


Uo4t>44 


AAATAA 












OO 


Uo4o40 


AACAT7 


AA1 AAO 
00104^ 




Ud403c 


AAA 7 A. 7 
UU4 f Of 


AAAAAA 

OOODOO 


003<: 


O34o5o 


140177 


t 77777 
1 f f f f f 


iLAQT 
Oo30 


A TA£.£^ 

U34004 


AAAAA1 






ATA 


AAAAAA 
OOOOOO 


AAAAAA 

OOOOOO 


003D 


ATAi^70 
0o40 r c 


AA77AA 
OO f fOO 




OOZjO 




AA77AA 

OO f f 04 




OOD r 








0030 


ATA£,7£ 


AA^AT7 

003UO f 


AA1 AA'^ 

001042 






AAA 7^7 
004 f o 7 


AAAAC^A 

000430 


O0OU 


ATA 

U34 rUo 


AA 7 A. A. 7 
04 / DO » 


A7C 7C7 

O 75 f 57 


OOOl 


OM f 14 


1 A777T 
X6 fffO 




OOOc 


%JOH f XO 


ODDO f D 


1 7T7^7 
1 f 3 f D f 


OODO 


fee 


AA771 7 
OO i fXf 




OOO'I 


ATA70A 
0<34 f c4 


AA77AA 
OO f f OO 




OOOD 








OOOO 




00300 f 


AAl AA O 
00104i; 


ARA7 
OOO > 




A^kA 7^7 
004 f O f 


AAAAOA 

0004e0 




0-34 1 OO 


AAAAAA 

04o400 


OOOOOO 


OOO 7 


ATA7AA 


AAAAAA 
OOOOOO 




AA70 




AA1 AAA 
OOXOOO 


AAAAAA 

OOOOOO 


AA71 
OO / X 


UO^ f 3c 


AA77AA 
OU / f OO 




AA73 
Oo • c 


ATA fClit 


AA77AA 
OOf fOO 




OO ' O 












tot 


W\AA/X 


6875 


034764 


004767 


000366 


6876 


034770 


077607 


OOOOOO 


6877 


034776 


OOOOOO 




6878 


035000 


OOOOOO 


OOOOOO 



TST107: 

INC 

jl/ACO-0. INT 

CLR 
JSR 
.WORD 



»TESTN 

SOFLAG 

R7.SC0SUB 

0177.0,0.0 



{INCREMENT TEST NUMBER 



.WORD O.-l 

.WORD 7640 

. UORD 7644 
J2/AC0--0. LONG 

CLR 8#FLAG 

JSR R7,SC0SUB 

.WORD 100177. -I. -1, 

.WORD 0.0 

.WORD 7700 

.WORD 7704 
(3/EXP-lOO. LONG 

CLR BCTLAG 

JSR R7.SC0SUB 

.WORD 20000.0.0.0 

.WORD 0.0 

.UOftO SCO 

UORO 304 
i4/EXP"26o. BAISEO 0. INT. ROUND 



I NO INTERRUPTS 

lOO TEST 
lACO 

•RESULT 
I TEST FPS 
1 RESULT TPS 

INTERRUPT 

J 00 TEST 
tACO 

jRESULT 
I TEST FPS 
» RESULT FPS 



iNO INTERRUPT 
I DO TEST 
lACO 



J RESULT 
, TEST FPS 
I RESULT FPS 



iS/LONG 



CLR 
JSR 
.UORO 

.UORO 
.UORD 
.WORD 

aR 

JSR 
.WORD 



0«FLAC t INTERRUPT 

R7.SC0SVJe iDO TEST 

140177.177777,1.1 ,ACO 



0.0 

7700 

7704 



{RESULT 
I TEST FPS 
{RESULT TPS 



S«FLAG I INTERRUPT 

R7.SC0SUB iDO TEST 

•7667.75757.157737,167775 



:ACO 



55675,173757 
7717 
7700 



.UORO 
.WORD 
.UORO 
i6/L0NG. EXP-2**32 

CLR S«fLAG 

JSR R7.scosue 

.WORD 46400.0.0.0 

.WORD 1000.0 

.WORD 7700 

.WORD 7700 
:7/L0NG. EXP>2**32 

MOV «l,fi«rLAG 

JSR R7,SCDSUB 

.WORD 77607.0.0,0 

.WORD n.O 



iRESULT 
J TEST FPS 
jRESULT FPS 



I NO INTERRUPT 
tOO TEST 
lACO 



I RESULT 
I TEST FPS 
I RESULT FPS 



{INTERRUPT 
tOO TEST 
tACO 



{RESULT 



NIO 



GLOBAL AREAS 
KOJllA.MAC 



MACni 30A(1052) 15-MAR-84 16:58 PAGE 150 



15 MAR -84 15:51 



T107 



TEST STCOI. STCDL 



SEQ 0130 



6879 
6880 
6881 
6882 
6883 
6884 
6885 
6886 
6887 
6888 
6889 
6890 
6891 
6892 
6893 
6894 
6895 
6896 
6897 
6898 
6899 
6900 
6901 
6902 
6903 
6904 
6905 
6906 
6907 
6908 
6909 
6910 
6911 
6912 
6913 
6914 
6915 
6916 
6917 
6918 
6919 
6920 
6921 
6922 
6923 
6924 
6925 
6926 
6927 
6928 
6929 
6930 
6931 
6932 
6933 
6934 



035004 
035006 

035010 
035014 
035020 
035026 
035030 
035034 
0SS036 

035040 
035046 
035052 
035060 
035062 
0SS066 
035070 

035072 
035100 
035104 
035112 
035114 
035120 
035122 

035124 
035132 
035136 
035144 
035146 
035152 
035154 

035156 
035164 
035170 
035176 
035200 
035204 
035206 

035210 
035216 
055222 
035230 
035232 
035236 
035240 

035242 
035246 
035252 
035260 
035262 



007700 
107705 

005037 
004767 
043200 
000000 
010000 
007600 
007600 

012737 
004767 
077777 
177777 
000000 
007600 
107605 

012737 
004767 
043300 
000000 
000000 
047700 
047700 

012737 
004767 
143300 
177777 
177777 
007300 
007310 

012737 
004767 
050100 
OOOOOO 
000000 
047700 
147705 

012737 
004767 
050377 
177777 
OOOOOO 
007300 
007305 

005037 
004767 
100200 
177777 
OOOOOO 



001042 
000336 

OOOOOO OOOOOO 
177777 



000001 001042 
000304 

177777 177777 
177777 

OOOOOO 001042 
000252 

OOOOOO OOOOOO 
014000 

OOOOOO 001042 
000220 

177777 177777 
163741 

000002 001042 
000166 

OOOOOO OOOOOO 
OOOOOO 

OOOOOO 001042 
000134 

177777 177777 
OOOOOO 



001042 
000104 

177777 177777 
OOOOOO 



.WORD 7700 
.UORD 107705 
j8/INT. EXP-2»»15 

CLR S«fLAG 
JSR R7.SCDSUe 
.UORD 43200.0,0.0 

.UORD 10000. -1 

.UORD 7600 

. UORD 7600 
j9/lNT. EXP>2**15 

nOV 91 . S«FLAG 

JSR R7.SC0SUB 

.WORD 77777.-1.-1.-1 

.UORD O.-l 

.UORD 7600 

. UORD 107605 
slO/INT. EXP>2»»15, FID 

nOV «0.8«FLAG 

JSR R7.SCDSUB 

.WORD 43300.0.0.0 

.WORD 0.14000 

.WORD 47700 

.WORD 47700 
jll/INT, EXP>2**1S. F1C"0 

MOV «0.a*FLAG 

JSR R7.SCDSUB 

.WORD 143500.-1.-1.-1 

.UORD -1.163741 
.WORD 7300 
.WORD 7510 
:12/L0NG. EXP>2**32. FID 
nOV #2.MrLAG 
JSR R7.SC0SUB 
.WORD 50100.0.0.0 

.WORD 0.0 
.WORD 47700 
.WORD 147705 
113/LONC, eXP>2**52. FIC-0 
nOV •0.8«fLAG 

JSR R7.scosue 

.UORD 50377,-1. -l.-l 

.WORD 0.0 

.WORD 7300 

.WORD 7305 
;14/L0NG. EXP<0 

CLR ««fLAG 

JSR R7.SC0SUB 

.WORD 100200. -l.-l.l 

.WORD 0.0 



I TEST FPS 
iRESULT FPS 

I NO INTERRUPTS 

jDO TEST 
lACO 

{RESULT 
J TEST FPS 
iRESULT FPS 



J INTERRUPT 
I 00 TEST 
:ACO 



iRESULT 
I TEST FPS 
iRESULT FPS 



iNO INTERRUPT 
iDO TEST 
tACO 



(RESULT 
I TEST FPS 
jRESULT FPS 

tHO INTERRUPT 
I DO TEST 
lACO 

iRESULT 
t TEST FPS 
» RESULT FPS 

t INTERRUPT 
I DO TEST 
tACO 

iRESULT 
I TEST FPS 
•RESULT FPS 



tNO INTERRUPT 
iDG TEST 
lACO 



iRESULT 
t TEST FPS 
•RESULT FPS 

iNO INTERRUPTS 

tOO TEST 
lACO 

iRESULT 



GLOBAL AM AS 
KOJllA.MAC 



b9S5 
b9S6 
f>'*57 
6956 
6959 
6940 
6941 
6<»42 
6945 
6944 
6945 
6946 
6947 
6948 
6949 
6950 
6951 
6952 
6955 
6954 
6955 
6956 
6957 
6956 
6959 
6960 
6961 
6962 
6965 
6964 
6965 
6966 
6967 
6966 
6969 
6970 
6971 
6972 
6975 
6974 
6975 
6976 
6977 
6978 
6979 
6960 
6961 
6982 
6965 
6964 
6965 
6966 
6987 
6988 
6989 
6990 



055266 
055270 

055272 
055276 
055502 
055510 
055512 
055516 
055520 

055522 
055526 
055552 
055540 
055542 
055546 
055550 



MACtll 50A(1052) 
15 MAR 64 15:51 

007757 
007744 

005057 001043 
004767 000054 



IS Hn»4 64 16:58 PAGE 151 

\lo7 TEST STCOI. STCOL 



SEO 0151 



057700 177777 177777 
177776 

000000 177777 

007600 

007604 

005057 001042 
004767 000024 
0O4577 177777 177777 
177777 

000000 177777 

007600 

007604 



.UORO 
.WORD 
il«'INT, EXP«0 
CLR 
JSR 
.UORO 



7 757 
7744 

B«FLAG 

R7.SCDSUB 
57700.-1. 1.-2 



.WORD 0.-1 

.UORO 7600 

.UORO 7604 
1I6/INT. EXP- 10 

CLR S«FLAG 

JSR R7.SC0SUB 

.UORO 4577. 1.-1, 1 

.UORO 0.1 

.UORO 7600 

.UORO 7604 



055552 000167 000244 



JMP 



H0P21 



I TEST FPS 
•RESULT FPS 

iNO INTERRUPTS 

lOO TEST 
lACO 

I RESULT 
I TEST TPS 
I RESULT rpj 

iNO INTERRUPTS 

lOO TEST 
lACO 

I RESULT 
I TEST FPS 
{RESULT FPS 



iCET OVER SUBROUTINE 



055556 012602 

055560 012757 055452 000244 

055566 012701 001150 

055572 012711 177777 

055576 012741 177777 

055402 012700 000200 

055406 170100 

055410 010204 

055412 172414 

055414 016200 000014 

055420 170100 

055422 175411 

055424 170527 

055426 000000 



055450 052757 000001 001042 
055456 00142€ 
05'^40 104000 



*x*x*x*x*x*x*x*x*x*x*x*x«x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x*x 

STCOI. STCOL, STCFI, STCFL 

ACO 

RESULT 

FPS BEFORE EXECUTION 
FPS AFTER EXECUTION 
(FEC) 

TRAP ON CONVERSION FAILURE 

•X«X*X*X*X*X*X*X*X*X*X*X«X*XftX«X*X*X«X«X*X«X*X*X*X*X*X«X*X 
•X*X*X*X*X*X*X«X*X*X*X*X«X*X*X«X*X*X*X*X*X*X*XftX*X«X*X«X*X 



SCOSUB: NOV 
HOV 
NOV 
HOV 
HOV 
HOV 
LOFPS 
HOV 
LOO 
MOV 



LOFPS RO 



(SP)..R2 

•SOt.BtFPVEC 

•REC0ST»2.Rl 

• -i,(i»n 

• -l.-(Rl) 
•200.ro 
RO 

R2.R4 

(R4).AC0 
14(R2).R0 



t 

401: 

IS: 

t 



STCOI 

STST 

.UORO 



ACO.(Rl) 

(PC)» 

0 



» INSTRUCT TON DIDNT TRAP 

BIT OLS^FLAG 
BEQ 2t 
ERROR 



I RETURN ADDRESS TO USE AS POINTER 
•REDIRECT TRAP VECTOR 
iPOINT TO RESULT AREA 
iPRELOAO RECEIVE DATA BUTFER 

IsET FPS TO DOUBLE 

IpOINT TO ACO DATA 

iLOAO ACO 
iGET TEST FPS 
iLOAO TEST FPS 

l*TEST INSTRUCT ION( ACCORDING TO HQOE ' 
lUAIT FOR POSSIBLE FPA TRAP. 
iSTORE STATUS HERE. 



(VERIFY A NO TRAP CONDITIc^ 
(BRANCH IF GOOD 

|A(l ERRORS TO TRAP TO EHT vEC'OR 





055442 


000505 






055444 


002015 




6995 








6994 


055446 


000167 


000042 


6995 








6996 








6997 


055452 


052757 


000001 


6998 


055460 


001005 




6999 


055462 


104000 




7000 


055464 


000504 




7001 


055466 


002015 




7002 








7005 


0554 70 


000167 


000020 


7004 


055474 


012604 




7005 


055476 


005726 




7006 


055500 


022704 


035424 


7007 


055504 


001405 




7006 


035506 


104000 




7009 


055510 


000505 




7010 


055512 


002015 




7011 








7012 








7015 








7014 








7015 


055514 


170203 




7016 


055516 


016200 


000016 


7017 


055522 


020003 




7018 


055524 


001405 




7019 


055526 


104000 




7020 


055530 


000506 




7021 


055552 


002015 




7022 








7025 


055554 


010204 




7024 


055556 


062704 


000010 


7025 


055542 


004767 


144362 


7026 


055546 


005767 


143266 


7027 


055552 


001405 




7028 


055554 


104000 




7029 


055556 


000507 




7050 


03556O 


002013 




7051 








7052 


035562 


005757 


001042 


7055 


035566 


001002 




7054 


0355 7C 


000162 


000020 


7055 








7056 


055574 


012704 


001106 


7057 


055600 


170514 




7058 


055602 


021427 


000006 


7059 


055606 


001405 




7040 


055610 


104000 




7041 


035612 


000510 




7042 


055614 


002015 




7043 








7044 


035616 


000162 


000020 


7045 








7046 


055622 







.WORD 505 

. WORD FPPERR 

JMP 21 

Instruction trapped 

001042 50t: BIT •1.8«FLAC 

BNE 51 t 
ERROR 

.UORD 504 

.WORD FPPERR 

JMP 21 

51»! MOV (SP)..R4 

TST CSP). 

CMP •1I.R4 

BEQ 2t 
ERROR 

.WORD 505 

.WORD FPPERR 

I 



itwnoN 


CODE FOR TRAP AND NO 


1 VEHIr T 


STATUS 




2> : 


STFPS 


R5 




MOV 


I6(R2).R0 




CMP 


R0.R5 




OCU 


31 




ERROR 






.WORD 


506 




.WORD 


FPPERR 


5*: 


MOV 


R2.R4 




AOO 


•10.R4 


4$: 


JSR 


R7,DATvrR 




TST 


COUNT 




BEQ 


5t 




ERROR 






.UORO 


507 




.UORO 


rpPERft 


51: 


TST 


8#fLAG 




BNE 






JMP 


20(R2) 


1 VERIFY 


FEC 




7$: 


MOV 


4AECFEC.R4 




STS» 


(R4) 




CMP 


CR4).«6 




BEQ 


e« 




ERROR 






.WORD 


510 




.WORD 


FPPERR 


81: 


JMP 


20(R2) 



M0P21: 



SEQ 0152 



I UNIQUE ERROR NUMBER 
I ADDRESS OF ERRCW MESSAGE 
(INSTRUCTION SHOULD HAVE TRAPPED 
iREJOIN CODE 



I SEE IF EXPECTING A TRAP 
•BRANCH IF EXPECTING A TRAP 
lAU ERRORS TO TRAP TO EMT VECTOR 
{UNIQUE ERROR NUMBER 
I ADDRESS OF ERROR MESSAGE 
I INSTRUCTION WASNT SUPPOSE TO TRAP 
iREJOIN CODE 

I SEE IF PC - INSTRUCTION 
I CLEAN UP STACK 

i BRANCH IF GOOD COMPARE 
{ALL ERRORS TO TRAP TO EMT VECTOR 
•UNIQUE ERROR NUMBER 
•ADDRESS or ERROR MESSAGE 
I PC WAS INCORRECT 

TRAP 

I SAVE FPS 

iGET EXPECTED STATUS 
iVERIFt STATUS 
•BRANCH IF GOOD 

I ALL ERRORS TO TRAP TO EMT VECTOR 

I UNIQUE ERROR NUMBER 

I ADDRESS OF ERROR rCSSAGE 

I BAD FPS 

iPOINT TO EXPECTED DATA 

•VERIFY DATA 
•BRANCH IF GOOD 

•ALL ERRORS TO TRAP TO EMT VECTOR 
I UNIQUE ERROR NUMBER 
•AOORESS OF ERROR MESSAGE 

iBAO ACO 

•SEE IF NEED TO CHECK FEC 
•BRANCH IF NEED TO C»€CK 
•RETURN FRON TEST 

•POINT TO FEC AREA 
•SAVE FEC 

•VERIFY FEC FOR OvERFLOU 
•BRANCH IF GOOD 

•ALL ERRORS TO TR^^ TO EMT VECTOR 
•UNIQUE ERROR NUMBER 
lAOORESS or ERROR MESSAGE 
•BAD FEC 
tRETURN FROM TEST 



S.> ) IS MAR, 



SEQ 0155 



'04' 








7048 


05562J 






'049 








7050 








7051 








'052 
'053 


035622 






035622 


005267 


143156 


705-4 








"055 


035626 


005037 


001042 


7056 


035632 


004767 


177520 


7057 


035636 


044541 


052525 


7056 


035644 


177777 




7059 


035646 


000003 


102525 


70#>0 


035652 


007517 




7061 


035654 


007500 




7062 








7063 


035656 


005037 


001042 


7064 


035662 


004767 


1774 70 


7065 


035666 


002300 


177777 


7066 


035674 


177777 




7067 


035676 


000000 


177777 


7068 


035702 


007400 




7069 


035704 


007404 




7070 








7071 


035706 


012737 


000001 


7072 


035714 


004767 


177436 


7073 


035720 


070000 


177777 


7074 


035726 


177777 




7075 


035730 


OOOOOO 


OOOOOO 


707fi 


035754 


007540 




7077 


035736 


107545 




7078 








7079 


035740 


005037 


001042 


7080 


035744 


004767 


177406 


7081 


035750 


052000 


OOOOOO 


7082 


035756 


177777 




7083 


035760 


OOOOOO 


177777 


7084 


035764 


047000 




7085 


035766 


047005 




7086 








7087 








7068 








7089 


J35770 






7090 








7091 








7092 








7093 


035770 






7094 


035770 


005267 


143010 


7095 








7096 


035774 


004767 


000154 


7097 


036000 


020000 


OOOOOO 


70W 


036006 


OOOOOO 




7099 


036010 


177700 




7100 


036012 


007740 




7101 


036014 


007750 




7102 









HSCr; 



177777 



177777 



001042 
177777 



177777 



litEST 110 
TSTllO: 

INC 

il/LONG EXP -30 
CLB 
JSR 
.WORD 

.WORD 
.WORD 
.WORD 
»2/INT. EXP<0 
CLR 
JSR 
.WORD 



TEST STCFI. STCFL 
•TESTN 



8«rLAU 

R7.SCDSUB 

44541.52S2S. 

3.102525 

7517 

7500 

SAfLAC 
R7.SC0SUB 
2300. -1. l. - 



.WORD 0.-1 

.WORD 7400 

.WORD 7404 
|3/L0NG. EXP>>2**32 

MOV •l.a«FLAC 

JSR R7.SCDSUB 

.WORD 70000. l.'l. 

.WORD 0.0 

.WORD 7540 

.WORD 107545 

I4/INT.EXP-5. FIC-0, riO-l 

CLR BCTLAG 

JSR R7.SC0SUB 

.WORD 52000.0.-1.-: 



.WORD 
.WORD 
.MORO 



O.'l 

47000 

47005 



i INCREMENT TEST NUMBER 



I NO INTERRUPTS 

I DO TEST 
1 |ACO 

{RESULT 
I TEST FPS 
•RESULT FPS 

iNO INTERRUPTS 

(00 TEST 
lACO 

I RESULT 
I TEST FPS 
(RESULT FPS 

•INTERRUPT 
tOO TEST 
lACO 

iRESULT 
I TEST TPS 
iRESULT FPS 

iNO INTERRUPTS 

tOO TEST 
lACO 

{RESULT 
• TEST FPS 
{RESULT FPS 



MSXP: 

UtEST III 
TSTlll: 



TEST STE]<R 



INC 


•TESTN 


lIMCNE»CNT 


J 1 /EXP -100 






JSR 


R7.SXPSU8 


lOO TEST 


.WORD 


20000.0.0.0 


tACO 


.WORD 


• too 


{RESULT 


.WORD 


7740 


{ TEST FPS 


.WORD 


7750 


{RESULT FPS 


;2/EXP-201 FLOAT. NEC 





1 1. 



KOJllA.MAC 



MAC>U 50A(10S<?) 
IS MAR 64 IS: SI 



15 MAR B4 
Till 



16:58 PAGE 134 
TEST STEXP 



SEQ 0154 



7105 
7104 
7105 
7106 
7107 
7108 
7109 
7110 
7111 
7112 
7113 
7114 
7115 
7116 
7117 
7118 
7119 
7120 
7121 
7122 
7125 
7124 
7125 
7126 
7127 
7126 
7129 
7130 
7131 
7132 
7133 
7134 
7135 
7136 
7137 
7136 
7139 
7140 
7141 
7142 
7143 
7144 
7145 
7146 
7147 
7146 
7149 
7150 
7151 
7152 
7153 
7154 
7155 
7156 
7157 
7156 



036016 
036022 
036030 
036032 
036034 
036036 

036040 
036044 
036052 
036054 
036056 
036060 

036062 
036066 
036074 
036076 
036100 
036102 

036104 
036110 
036116 
036120 
036122 
036124 

036126 
036132 
036140 
036142 
036144 
036146 



004767 
140377 
000000 
000001 
007500 
007500 

004767 
000177 
177777 
177600 
007700 
007710 

004767 
020000 
177777 
177700 
040200 
040210 

004767 
040000 
000000 
000000 
007700 
007704 

004767 
000177 
177777 
177600 
000000 
000010 



000132 
177777 



000110 
177777 



000066 
000000 



000044 

000000 



000022 
177777 



177777 



JSR R7.SXPSUB 
.WORD 140377. 1. 1.0 



jOO TEST 
lACO 



177777 



177777 



000000 



.UORO 
.UORO 
.WORD 
|3/EXP--177 
JSR 
.WORD 

.UORO 
.UORO 
.UORO 
t4/EXP*-100 
JSR 
.UORO 

.UORO 
.UORO 
.UORO 
J5/EXP-200 
JSR 
.WORD 

.UORO 
.UORO 
.UORO 



1 

7500 
7500 

R7.SXPSUB 
177. -1. -I. -1 

177600 

7700 

7710 

R7.SXPSUB 
20000.0. 1.-1 

-100 

40200 

40210 

R7.SXPSUB 
40000.0.0.0 



(RESULT 
I TEST FPS 
I RESULT FPS 



lOO TEST 
tACO 



•RESULT 
I TEST fPS 
I RESULT FPS 



lOO TEST 
lACO 



I RESULT 
» TEST FPS 
I RESULT FPS 



I 00 TEST 
lACO 



t6/EXP-0 



0 iRESULT 
7700 I TEST FPS 

7704 I RESULT FPS 



177777 



JSR 
.WORD 



R7.SXPSUB 
177. -I, -I. 1 



iDO TEST 
.AfO 



036150 000167 000120 



.UORO 177600 
.WORD 0 
.UORO 10 



JMP 



iRCSULT 
I TEST FPS 
•RESULT FPS 



036154 
036156 
036164 
036170 
036174 
036176 
036200 



012602 
012737 
012701 
012700 
170100 
010204 
172414 



H0P22 tGET OVER SUBROUTINE 

*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X«X 

*x*x*x*x*x*x*x*x*x*x*x*x«x*x*x*x*x*x*x*x*x*x*x*x*x*y«x*x*x 

STEXP 

ACQ 

EXPONENT RESULT 

FPS BEFORE EXECUTION 

FPS AFTER EXECUTION 

NO TRAPS CAN OCCUR 

*X*X*X*X*X*X*X*X*X«X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X 
*X«X*X*X*X*X*X*X*X*X*Xa)(*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X*X 



036256 
001126 
000200 



000244 



SXPSUBi HOV 

m\i 

MOV 

MOV 

LOFPS 

MOV 

LOO 



CSP)».R2 

#SOt.S«FPVEC 

•RECDST.Rl 

•200.ro 

RO 

R2.R4 
(R4).AC0 



I RETURN MXJRESS TO USE AS POINTER 
iREOIRECT TRAP VECTOR 
I POINT TO RESULT AREA 
I SET FPS TO DOUBLE 



» POINT 



TO ACO OAT A 
ILOAO ACO 



I 

ol OBAc AREAS MACUl 50A( 105.? ) lb MAR 64 16:56 PPGt 155 
KDJllA.MAC 15 MAR 64 15:51 Till TEST STEXP 



7159 


036202 


016200 


000012 




MOV 


12(R2).R0 


7160 


036206 


170100 






LDFPS 


RO 


7161 








i 






7162 


036210 


175011 




40* : 


STEXP 


ACO.(Rl) 


7165 








1 

1 VERIFY 






7164 








STATUS 




7165 


036212 


170203 




2>: 


STFPS 


R3 


7166 


036214 


016200 


000014 




MOV 


14CR2).R0 


7167 


036220 


020003 






CMP 


RO.RS 


7168 


036222 


001403 






BEQ 


3* 


7169 


036224 


104000 






ERROR 




7170 


036226 


000511 






.WORD 


511 


7171 


036230 


002013 






.UORO 


FPPERR 


7172 














7173 


036232 


016204 


000010 


S»: 


MOV 


10(R2).R4 


7174 

7175 


036236 


020437 


001126 




CMP 


R4.84REC0ST 


036242 


001403 






BEQ 


5» 


7176 


036244 


104000 






ERROR 




7177 


036246 


000512 






.UORO 


512 


7178 


05S25O 


002013 






.WORD 


FPPERR 


7179 














7180 


036252 


000162 


000016 


5*: 


JMP 


16(R2) 


7181 








< 






7182 








t INSTRUCTION TRAPPED 


7183 


036256 


012600 




50»: 


MOV 


{SP)..RO 


7184 


036260 


012605 






MOV 


CSP)»,R5 


7165 


036262 


104000 






ERROR 




7186 


036264 


000513 






.UORO 


513 


7187 


036266 


002013 






.UORO 


FPPERR 


7188 














7189 


036270 


000167 


177756 




JMP 


5» 


7190 








s 






7191 














7192 


036274 






K)P22: 






7193 














7194 















SEQ 0155 



iGET TEST FPS 
I LOAD TEST FPS 

i*TESr INS TRUCTIONC ACCORDING 10 MODE) 



iSAVE FPS 

I GET EXPECTED STATUS 
I VERIFY STATUS 
I BRANCH IF GOOD 

I ALL ERRORS TO TRAP TO EMT VECTOR 
•UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 

I BAD FPS 

, POINT TO EXPECTED EXPONENT 
I VERIFY EXPONENT 
(BRANCH IF GOOD 

(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 

(BAD ACO 

i RE TURN FROM TEST 



I SAVE PC 
•SAVE OLD PS 

(ALL ERRORS TO TRAP TO EMT VECTOR 
(UNIQUE ERROR NUMBER 
(ADDRESS OF ERROR MESSAGE 
lUlLD TRAP DURING STExP 
(REJOIN CODE 



GLOBAL AREAS 
KDJllA.MAC 



7195 

7196 

7197 

7196 

7199 

7200 

7201 

7202 

7203 

7204 

7205 

7206 

7207 

720« 

7209 

7210 

7211 

7212 

7213 

7214 

7215 

7216 

721"' 

7218 

7219 

7220 

7221 

7222 

7223 

7224 

7225 

7226 

7227 

7228 

7229 

7230 

7231 

7232 

7233 

7234 

7235 

7236 

7237 

7238 

7239 

7240 

7241 

7242 

7243 

7244 

7245 

7246 

7247 

7248 

7249 

7250 



MACUl 50A(1052) 
15 -MAR 84 15:51 



036274 
036274 
036300 
036302 
036306 
036306 
036312 
036320 
036322 
036324 
036326 
036330 
036332 
036334 
036340 
036344 
036346 
036352 
036356 
036360 
036362 
036364 
036366 
036370 
036372 
036372 
036374 
036376 

036402 
036410 
036416 
036424 
036432 
036440 
036446 
036454 
036456 
036464 
036472 
036500 



005767 
001002 
104401 

005267 
042767 
005327 
000001 
003022 
012737 
000001 
036322 
104401 
016746 
104405 
104401 
013700 
001405 
000005 
004710 
000240 
000240 
000240 

000137 
002410 
377 
036402 
005015 
026514 
042113 
046106 
043516 
052116 
047107 
000105 
005015 
041114 
050040 
000043 



15 -MAR 84 16:58 PACE 136 
Till TEST STEXP 

.MCALL lOMSG.ENOPAS 
.SBTTL END OF PASS ROUTINE 



SEQ 0136 



142506 
036402 
142474 

100000 142466 



036456 
142442 

036376 
000042 



377 

055103 
026502 
030512 
040517 
050040 
042040 
051517 

055103 
042440 

051501 



000 

042113 
020060 
020061 
044524 
044517 
040511 
044524 

042113 
042116 
020123 



{•INCREMENT THE PASS NUMBER (iPASS) 

i*INOICATE END -OF -PROGRAM AFTER 1 PASSES THRU THE PROGRAM 
i*IF THERES A MONITOR GO TO IT 
i*IF THERE ISN'T JUMP TO RESTART 



tEOP: 





TC T 


♦PASS 




DNC 


TO Tff\ 




1 Trt 


» nbul 


CI#TDTf\. 










AD ACC 




Bib 








(PC)» 


«CUr*L I : 


unbn 
. HUNU 


1 

I 




DU I 






HUV 


f \ A. Of ^ ^ 




. HUKU 


I 




•tWC I 






T VDC 


tHbuc 




nuv 






T vonc 




Type 




»GET42: 


MOV 


M42.R0 




BEQ 


tOOAGN 




RESET 




tENOAO: 


JSR 


PC.(«» 




NOP 




NOP 






NOP 




tOOAGN: 








JMP 




tRTNAO: 


.UOAO 


RESTART 


tENULL: 


.BrTE 


-l.-l.O 




.EVEN 




MSGl: 


.ASCIZ 


«CR»«LF>/C?KOL 



lONLt TrPE MESSAGE AT END OF FIRST PASS 
I IF >0 THEN SKIP THE ID MESSAGE 
I ELSE TYPE THE iO MESSAGE 

1 1 INCREMENT THE PASS NUMBER 
liDON'T ALLOW A NEG. NUMBER 
liLOOP? 

1 1 YES 

I {RESTORE COUNTER 



1 1 SAVE »PASS FOR TyPEQUT 

liCO TYPE --DECIMAL ASCII WITH SIGN 

I (GET MONITOR AOORESS 

llBRANCH IF NO MONITOR 

liaEAR THE UORLD 

llGO TO MONITOR 

1 1 SAVE ROOM 

liFOR 

ilACTll 

tlRETURN 

llNULL CHARACTER STRING 



MSG2: .ASCIZ *CR»<LF>/CZK0L8 END PASS •/ 



.EVEN 
.SBTTL 



TYPE ROUTINE 



!«ROUTINE TO TYPE ASCXZ MESSAGE. MESSAGE MUST TERMINATE WITH A 0 B> TE . 
i«TH£ ROUTINE HILL INSERT A NUMBER OF NULL CHARACTERS AFTER A LINE ^^EEO. 



U-OBAt ARIAS MAClll ^OM^ 10 
KOJllA.HAC 15 HAR 6h 15:51 



OS. ) 



TrPfc 



NE 



PAGE 137 



S£0 015 7 



-'251 

7252 

725 < 

7254 

7255 

7256 

7257 

725« 

7259 

7260 

7261 

7262 

7265 

7264 

7265 

7266 

7267 

7268 

7269 

7270 

7271 

7272 

7273 

7274 

7275 

727b 

7277 

7278 

7279 

7280 

7281 

7282 

7283 

7284 

7285 

7286 

7287 

7288 

7289 

7290 

7291 

7292 

7293 

7294 

7295 

7296 

7297 

7298 

7299 

7500 

7301 

7302 

7303 

7304 

7305 

7506 



•NOTEl 
♦N0TE2 
♦N0TE3 



•CALL : 
•I) USING A 
• TYPE 
«0R 



♦NULL CONTAINS THE CHARACTER TO BE USED AS THE flLLER CHARACTER, 
♦FILLS CONTAINS THE NUMBER Of FILLER CHARACTERS REQUIRED. 
»FILLC CONTAINS THE CHARACTER TO FILL AFTER. 



TRAP INSTRUCTION 
.HESAOR 



llMESAOR IS FIRST ADDRESS OF AN ASCIZ STRING 

















www 
















036516 


V A ' WW 


wwvc 






WVW JL 




WXV^ X 






1 ^7*»7 












01MWs7 






(V^J7<t7 






VW\A/V 






1 <P7<17 






WXV^^ 
















0365 70 


W3 ( 




056572 


012600 




056574 


062716 


000002 


036600 










WW! 1 


036606 


w k~ 




036610 




wucw 


036614 


001006 




036616 


005726 




036620 


104401 




036622 


002077 




056624 


105067 


000202 


056650 


000755 




056632 


004767 


000056 


036636 


126726 


000206 


036642 


001350 




036644 


016746 


000176 


036650 


105366 


000001 


036654 


002770 




036656 


004767 


000032 


036662 


105367 


000144 


036666 


000770 




036670 


112716 


000040 



142270 
142261 



< * 


TYPE 






{ * 










T5TB 


t TPFLG 






bpl 


* • 


iRR Tr YP^ 




HAL T 








BR 


5t 


1 iLEAVE 


It : 


HOV 


RO . - ( SP ) 


1 SAVE RO 




HOV 


a2( SP ) . RO 


1 iGET ADDRESS OF ASCT? STRTM; 




CHPB 


fAPTENV. tENV 


1 iRUM^ING IN APT MODE 




6NE 


62* 


1 tMO en CHECK rnQ i^t rriMcrM f 




bitb 


•APT SPOOL . IENVH 


11 SPOOL MESSAGE TO APT 




beq 


62 1 






MOV 


R0.61t 


iiKTUP MESSAGE ADDRESS FOR APT 




JSR 


PC tATYS 


it^POQL MESSAGE tn APT 


611 : 


.WORD 


0 


1 {MESSAGE ADDRESS 


621: 


BITB 


•APTCSUP. IENVH 


1 tAPT CONSOLE 9lJPPPE<;vn 




6NE 


601 


11 YES SKIP TYPE OUT 




MQVB 








BNC 








tst 


f SP)» 


II If TERHTMATOR POP TT OTP ^TATic 


601 : 


MOV 


CSP)*«RO 


1 iRESTQRE RO 


31: 


ADO 


•2.CSP) 


iiADJUST RETURM PC 




ATI 




1 iRETURN 


4t: 


oipe 


•HT.(SP) 


1 iBRanch if <MT> 




BEQ 


81 




dPB 


•CRLf .CSP) 


..BRANCH IE NOT <CRLE> 




BNE 


51 




TST 


(SP)* 


1 iMP <CR><1P> POliTV 




TYPE 




II TYPE A CR AND LF 




•CRLF 








CLRe 


ICHAftCNT 


1 {CLEAR CHARACTER COUNT 




BR 


21 


iiGET NEXT CHARACTER 


5»: 


JSR 


PC.ITYPEC 


ilGO TYPE THIS CHARACTER 


6>: 


CMP8 


•ritLCCSP). 


Ills IT TIME FOR FILLER ChARS.? 




SNE 


2t 


liZF NO GO GET NEXT CHAR. 




HOV 


•NULL,-(SP> 


itCZr • OF FILLER CHARS. NEEDED 








ilAlO THE NULL CHAR. 


71: 


OEce 


KSP) 


ilOOES A NULL NEED TO BE TtPEO? 






61 


liBR IF NO-GO POP THE NH.L OFF OF STACK 




jsn 


PC.fTTPCC 


1 iGO TYPE A NULL 




DECB 


•ChARCNT 


iiOO NOT COUNT AS A COUNT 




BR 


71 


liLOOP 



{HORIZONTAL TAB PROCESSOR 
81: MOVB .(SP) 



({REPLACE TAB WITH SPACE 



KOJllA, 



ARE Ab 
HAC 



15 



73or 


056674 


004767 


000014 




7306 


056700 


152767 


000007 


000124 


7509 


056706 


001572 






7310 


056710 


005726 






7311 


056712 


000724 






7312 


056714 








7313 


056714 


105777 


0O0116 




731« 


056720 


100022 






7315 


056722 


017746 


000112 




7316 


036726 


042716 


177600 




7317 


056752 


122716 


000023 




7318 


056756 


001012 






7319 


056740 








7520 


056740 


105777 


000072 




7521 


056744 


100575 






7522 


036746 


117716 


000066 




7525 


056752 


042716 


177600 




7324 


036756 


122716 


000021 




7525 


056762 


001366 






7526 


036764 








7327 


036764 


005726 






7528 


036766 








7529 


036766 


105777 


000050 




7350 


036772 


100375 






7551 


036774 


116677 


000002 


000042 


7332 


037002 


122766 


000015 


000002 


7355 


037010 


001003 






7554 


057012 


105067 


000014 




7535 


037016 


000406 






7356 


057020 


122766 


000012 


000002 


7557 


037026 


001402 






7358 


037050 


105227 






7559 


057052 


000000 






7540 


037054 


000207 






7341 










7542 


057056 


177560 






7545 


037040 


177562 






7544 


057042 


177564 






7545 


057044 


177566 






7346 


037046 


000 






7547 


057047 


002 






7548 


057050 


012 






7349 


057051 


000 






7550 


057052 


077 






7551 


057055 


012 


000 




7552 




U57056 






7553 










7354 










7555 










7556 










7557 










7358 










7359 










7360 










7361 










7362 











IS MAR 64 

Type 

9$: 



ITYPECi 



101«: 



1021: 
10»: 



JSR 

BITB 

BNE 

TST 

BR 

TSTB 

BPL 

HOV 

BIC 

CtW 

BNE 

TSTB 

BPL 

tlOVB 

BIC 

CMP8 

BNE 

TST 



PAGE 158 



TSTB 
BPL 
(10V8 
C«P(J 
BME 
CLM) 
W 

It: CMPB 
e£Q 
XNCB 
•CMARCNT: .MORO 
•TYPEX: RTS 



«TKS: 

ITKB: 

• TPS: 

»TP8; 

•NULL: 

IFILLS 

•FILLC 

♦TPFLG 

IQUES: 

•LF: 

•SBTTL 



.MORO 

.UORO 

.MMO 

.UOftO 

.BVTE 

.BYTE 

.BYTE 

.BYTE 

.ASCII 

.ASCIZ 

.EVEN 

CONVERT 



>7.ICHARCNT 
91 

(SP)» 
2< 

filTKS 
101 

8ITKB. (SP) 
♦177600. (SP) 
••XOFF.CSP) 
1021 

8ITKS 
1011 

filTKB.(SP) 
♦177600. (SP) 
♦»XON.(SP) 
lOlt 

(SP)» 

SSTPS 
101 

2(SP),atTP8 

•CR.ZCSP) 

1» 

tCHARCNT 

ITYPEX 

•LF.2(SP) 

ITYPEX 

(PC). 

0 

PC 

177560 

177562 

177564 

177566 

O 

2 

12 

0 

t* ^ *( 

«12> 



M Type a space 

I (BRANCH IF NOT AT 
1 1 TAB STOP 

1 1 POP SPACE OFF STACK 
I iGET NEXT CHARACTER 

jjCMAR IN KYBD BUFFER? 
ilBR IF NOT 
1 1 GET CHAR 

I (STRIP EXTRANEOUS SITS 
llUAS CHAR XOFF 
iiBR IF NOT 

I (WAIT FOR CHAR 

iiGET CHAR 
M STRIP IT 
iiUAS IT XON? 
ilBR IF NOT 

liFIX STACK 

iiUAIT UNTIL PRINTER IS REAOr 

iiLOAO CHAR TO BE TrPED INTO DATA REG. 
Ills CHARACTER A CARRIAGE RETURN? 
llBRANCH IF NO 

tiVES- aEAR CHARACTER COUNT 
iiEXIT 

Ills CHARACTER A LINE FEED? 

llBRANCH IF YES 

1 1 COUNT THE CHARACTER 

1 1 CHARACTER COUNT STORAGE 



tiTTY KDB STATUS iHJDOOl 

iiTTV KBO BUFFER iNJOOOl 

tiTTY PRINTER STATUS REG. IttORESS 

tiTTY PRINTER BUFFER REG. ADDRESS 

itCONTAINS NULL CHARACTER FOR FILLS 

t I CONTAINS • OF FILLER CHARACTERS REQUIRED 

iiXI^RT FILL CHARS. AFTER A "LIME FEED" 

irTERHINAL AVAILABLE-* FLAG (BIT<07>-0-VES) 

I {QUESTION HARK 

I t LINEFEED 



HJOOCl 
MJOOOl 
MJDOOl 
MJOOOl 
jMJOOOl 
HJOOCl 
HJDOOl 
MJDOOl 
MJOOOl 
MJOOOl 
MJOOOl 
HJDOOl 
MJOOOl 
MJOOOl 
MJOOOl 
HJDOOl 

:MJD001 



BINARY TO DECIMAL AND TYPE ROUTINE 



(•THIS ROUTINE IS USED TO CHANGE A t6-8IT BINARY NUMBER TO A 5-DIGIT 
(•SIGNED DECIHAL (ASCII) NUMBER AND ^YPE IT. DEPENDING ON WHETHER THE 
(•NUMBER IS POSITIVE OR NEGATIVE A SPACE OR A MINUS SIGN UILL BE TYPED 
(•BEFORE THE FIRST DIGIT OF THE NUMBER. LEADING ZEROS UiLL ALUAvS BE 
(•REPLACED UITH SPACES. 
I •CALL : 

(• MOV NUM..(SP) iiPUT THE BINARY NUMBER ON THE STACK 



ijLOBAc areas 
kojiia.mac 



Ui 1 

MACUl 50rt(105^) 15 MAR 64 16:58 PAGE 139 
15 MAR 64 15:51 CONVERT BINARY TO DECTMAL AND TYPE ROUTINE 



5EQ 0139 



7363 












TYPDS 




7364 
















7365 


037056 








» TYPOS: 






7366 


037056 


010046 








HOV 


RO,-(SP) 


7367 


037060 


010146 








MOV 


Rl.-(SP) 


7368 


037062 


010246 








MOV 


R2.-(SP) 


7369 


037064 


010346 








MOV 


R5. (SP) 


7370 


057066 


010546 








MOV 


RS.-CSP) 


7371 


037070 


012746 


020200 






MOV 


•20200. -CSP) 


7372 


037074 


016605 


000020 






MOV 


20(SP).RS 


7373 


037100 


100004 








BPL 


It 


7374 


037102 


005405 








NEC 


RS 


7375 


037104 


112766 


OOOOSS 


000001 




MOVB 


-.ICSP) 


7576 


037112 


005000 






It: 


CLR 


RO 


7577 


037114 


012703 


037272 






MOV 


*tOBLK.RS 


737(1 


037120 


112725 


000040 






MOVB 


.CRS)» 


7379 


037124 


005002 






2t: 


CLR 


R2 


7580 


037126 


016001 


037262 






MOV 


tOTBL(RO).Rl 


7381 


037152 


160105 






3t: 


SUB 


Rl.RS 


7382 


057154 


002402 








BLT 


4t 


7383 


057136 


005202 








INC 


R2 


7384 


057140 


000774 








BR 


3t 


7385 


057142 


060105 






4t: 


ADD 


Rl.RS 


7386 


057144 


005702 








TST 


R2 


7387 


057146 


001002 








BNE 


St 


7588 


057150 


105716 








TST8 


(SP) 


7589 


057152 


100407 








BMI 


7t 


7590 


057154 


106316 






St: 


ASLB 


(SP) 


7591 


057156 


103005 








BCC 


6t 


7592 


037160 


116665 


000001 


177777 




MOVB 


USP).-l(R3) 


7595 


057166 


052702 


000060 




6t: 


BIS 


♦•0.R2 


7594 


057172 


052702 


000040 




7t: 


BIS 


•• .R2 


7595 


057176 


110225 








MOVB 


R2.(R3)* 


7596 


057200 


005720 








TST 


(R0)« 


7597 


057202 


020027 


000010 






CMP 


R0.*10 


7598 


057206 


002746 








BLT 


2t 


^599 


057210 


003002 








6GT 


8t 


74CO 


057212 


010502 








MOV 


ftS.R2 


7401 


057214 


000764 








BR 


6t 


7402 


057216 


105726 






8t: 


TST8 


(SP)» 


7405 


057220 


100005 








BPL 


9t 


7404 


037222 


116665 


177777 


177776 




MOVB 


-USP>.-2<R5 


7405 


037230 


105015 






9»: 


CLR6 


(R5) 


7406 


057252 


012605 








MOV 


(SP)*.ft5 


7407 


037234 


012605 








MOV 


(SP)*.RS 


7408 


037256 


012602 








MOV 


(SP)».H2 


7409 


057240 


012601 








MOV 


CSP)*.Rl 


7410 


037242 


012600 








MOV 


(SP)*.RO 


7411 


057244 


104401 


037272 






TYPE 


.tOBLK 


7412 


057250 


016666 


000002 


000004 




MOV 


2(SP).4CSP) 


7415 


057256 


012616 








MOV 


(SP)».(SP) 


7414 


057260 


000002 








RTI 




7415 


057262 


025420 






tOTBL : 


10000. 




7416 


057264 


001750 








1000. 




7417 


057266 


000144 








100. 




741b 


037270 


000012 








10. 





11 GO TO THE ROUTINE 



PUSH RO ON STACK 

PUSH Rl CM STACK 

PUSH R2 ON STACK 

PUSH R5 ON STACK 

PUSH R5 ON STACK 

SET BLANK SWITCH AND SIGN 

GET THE INPUT NUMBER 

BR IF INPUT IS POS. 

MAKE THE BINARY NUMBER POS. 

MAKE THE ASCII NUMBER NEG. 

ZERO THE CONSTANTS INDEX 

SETUP THE OUTPUT POINTER 

SET THE FIRST CHARACTER TO A BLANK 

CLEAR THE BCD NUMBER 

GET THE CONSTANT 

FORM THIS BCD DIGIT 

BR IF DONE 

INCREASE THE BCD DIGIT BY 1 

ADD BACK THE CONSTANT 

CHECK IF BCD DIGIT -0 

FALL THROUGH IF 0 

STILL DOING LEADING OS? 

BR IF YES 

HSO? 

BR IF NO 

YES- -SET THE SIGN 

MAKE THE BCD DIGIT ASCII 

MAKE IT A SPACE IF NOT ALREADY A DIGIT 

PUT THIS CHARACTER IN THE OUTPUT BUFFER 

JUST INCREMENTING 

C»€CK THE TABLE INDEX 

GO DO THE NEXT DIGIT 

GO TO EXIT 

GET THE LSO 

GO CHANGE TO ASCII 

MAS T»C LSO TIC FIRST NON-ZERO? 

Bft IF NO 

YES- -SET THE SIGN FOR TYPING 

SET THE TERMINATOR 

POP STACK INTO RS 

POP STACK INTO RS 

POP STACK INTO R2 

POP STACK INTO Rl 

POP STACK INTO RO 

NOW TYPE THE NUMBER 

ADJUST THE STACK 



1 1 RETURN TO USER 



GLOBAL AREAS 
KOJllA.HAC 



MACTll 30A(105^) 
15 MAR 84 15:51 



7419 
7420 
7421 
7422 
7423 
7424 
7425 
7426 
7427 
7428 
7429 
7430 
7431 
7432 
7433 
7434 
7435 
7436 
7437 
7438 
7439 
7440 
7441 



037272 000004 



^ i 1 

15-riAR 84 16:58 PAGE 140 

CONVERT BINARY TO DECIMAL AND TYPE ROUTINE 

lOBLK: .BLKW 4 

•SBTTL BINARY TO OCTAL (ASCII) AND TYPE 



SEQ 0140 



*THIS ROUTINE IS USED TO CHANGE A 16-BIT BINARY NUMBER TO A 6-OIGIT 
*0CTAL (ASCII) NUMBER AND TYPE IT. 

♦ITYP0S-- -ENTER HERE TO SETUP SUPPRESS ZEROS AND NUMBER OF DIGITS TO TYPE 
*CALL : 

I J NUMBER TO BE TYPED 
liCALL FOR TYPEOUT 

iiN-1 TO 6 FOR NUMBER OF DIGITS TO TYPE 
jjM-1 OR 0 

ttl-TYPE LEADING ZEROS 
t lO-SUPPRESS LEADING ZEROS 



MOV 
TYPOS 
• BYTE 
.BYTE 



NUM.-(SP) 

N 

M 



7442 










1* 


NOV 


NUM..(SP) 


7443 










1* 


TYPOC 




7444 
















7445 


037302 


017646 


000000 




•TYPOS: 


NOV 


S(SP).-(SP) 


7446 


037306 


116667 


000001 


000211 




M0V8 


l(S^),»0riLL 


7447 


037314 


112667 


000207 






NOVB 


(SP}*.*0N00C*1 


7448 


037320 


062716 


000002 






ADD 


•2.(SP) 


7449 


037324 


000406 








BR 


ITYPON 


7450 


037326 


112767 


000001 


000171 


•TYPOC: 


NOVB 


•l.lOrXLL 


7451 


037334 


112767 


000006 


000165 




NOVB 


«6.»ONODE*1 


7452 


037342 


112767 


000005 


000154 


ITYPON: 


NOVB 


•S.tOCNT 


7453 


037350 


010346 








NOV 


RS.-(SP) 


7454 


037352 


010446 








NOV 


R4.-(SP) 


7455 


037354 


010546 








NOV 


R5.-CSP) 


7456 


037356 


116704 


000145 






NOVB 


•0N00E*1.R4 


7457 


037362 


005404 








MEG 


R4 


7458 


037364 


062704 


000006 






ADD 


«6.R4 


7459 


037370 


110467 


000132 






NOVB 


R4.tOHODE 


7460 


037374 


116704 


000125 






HOVE 


•0FILL.R4 


7461 


037400 


016605 


000012 






NOV 


12(SP).RS 


7462 


037404 


005003 








CLR 


R5 


7463 


037406 


006105 






1>: 


ROL 


RS 


7464 


037410 


000404 








BR 


3< 


7465 


037412 


006105 






2f : 


ROL 


RS 


7466 


037414 


006105 








ROL 


R5 


7467 


037416 


006105 








ROL 


R5 


7468 


037420 


010503 








NOV 


R5.R5 


7469 


037422 


006103 






3t! 


ROL 


R3 


7470 


C37424 


105367 


000076 






DECB 


lONOOE 


7471 


037430 


100016 








BPL 


7$ 


7472 


037432 


042703 


177770 






BIG 


'H77770.RS 


7473 


037436 


001002 








BNE 


4t 


7474 


037440 


005704 








TST 


R4 



* 
* 
* 

* 
* 

* 

*ITYP0N ENTER HERE TO TYPE OUT WITH THE SAME PARAMETERS AS THE LAST 

*<TYP0S OR tTYPOC 
*CALL: 

* NOV NUN.-(SP) iiNUMBER TO BE TYPED 

• TVPON jiCALL FOR TYPEOUT 

AtTYPOC-- -ENTER HERE FOR TYPEOUT OF A 16 BIT NUMBER 
♦CALL" 

(iNUNBER TO BE TYPED 
I J CALL FOR TVreOUT 

llPICKUP THE NODE 
t iLOAO ZERO FILL SWITCH 
t iNUNBER OF DIGITS TO TYPE 
1 1 ADJUST RETURN ADDRESS 



ilSET THE 
tiSET FOR 
tiSET THE 
llSAVE RS 
t I SAVE R4 
iiSAVE RS 
tiGET THE 



ZERO FILL SWITCH 
SIX(6) DIGITS 
ITERATION COUNT 



NUMBER OF DIGITS TO TYPE 



t I SUBTRACT IT FOR NAX. ALLOWED 

ilSAVE IT FOR USE 

t iGET THE ZERO FILL SWITCH 

tlPICKUP THE INPUT NUMBER 

I laEAR THE OUTPUT WORD 

tiROTATE NS8 P4T0 "C" 

iiGO 00 MSB 

I iFORN THIS DIGIT 



I iGET LSB OF THIS DIGIT 

1 1 TYPE THIS DIGIT? 

tiBR IF NO 

tiGET RID OF JUNK 

1 1 TEST FOR 0 

1 1 SUPPRESS THIS 0? 



Lii 

GLOBAL AREAS MACtll 50A(105.?) 15 MAH-84 16:58 PAGE 141 

KDJllA.HAC 15-nAR 64 15:51 BINARY TO OCTAL (ASCII) AND TYPE 



7475 


037442 


001403 








BEQ 


51 


i jBR IF YES 


74 76 


037444 


005204 






4f : 


INC 


R4 


liDON'T SUPPRESS ANYHORE 0' 5 


74 77 


037446 


052703 


000060 






BIS 


♦ ' OiR3 


1 jHAKE THIS DIGIT ASCII 


7478 


037452 


052703 


000040 




5t : 


BIS 


♦ ' ,R3 


1 iHAKE ASCII IF NOT ALREADY 


74 79 


037456 


110367 


000040 






HOVB 


RS,6> 


ItSAvc FOR TYPING 


7480 


037462 


104401 


037522 






TYPE 


.8» 


1 iGO lYPE THIS DIGIT 


7481 


037466 


105367 


000032 




7$ : 


DECB 


♦ OCNT 


IkkT Dw 4 

t 1 COUNT BY 1 


7482 


037472 


003347 








BGT 


2* 


t |dR Ir nOHt TO DO 


7483 


0374 74 


002402 








BLT 


6$ 


1 iBh if done 


7484 


037476 


005204 








INC 


Oil 

R4 


XKtCl toe 1 ACT nTr*TT TCkli T A Ai ALi&^ 

M IN5UHC LAST DXuIT IbN T A BLANK 


7485 


037500 


000744 








BR 


21 


Ofl TUf 1 AC T n T^ T T 

t iGO DO THE LAST DIGIT 


7486 


037502 


012605 






6» : 


HUV 




1 |KCb 1 UHC H3 


7487 


037504 


012604 








HOV 


^ ^ . Oil 

( 5P ) » , R4 


t iRcSTOHc H4 


7488 


037506 


012603 








HOV 


CSP ) ♦ .K3 


nf PTnnc nv 

1 iKESTOhE R3 


7489 


037510 


016666 


000002 


000004 




HOV 


2CSP J,4CSP) 


. f e T Tuf 0 T A^iy pnn ner ti infc.iTki^ 

II SET THE STACK FOR RETURNING 


7490 


037516 


012616 








HOV 


C 5P ) » , C 5P ) 




7491 


037520 


000002 








RTI 




1 1 n c 1 URN 


7492 


037522 


000 






o» : 


.BYTE 


0 


llbTURAUc rUR AbLXX UlbIT 


7493 


037523 


000 








.BYTE 


0 


tllCNniNnlUK rUH i Tr't RUUilNC 


7494 


037524 


000 






f ULNI : 


.BYTE 


0 


ItULiAL. UXbX 1 LUUNIcN 


7495 


037525 


000 






lOFILL : 


.BYTE 


0 


t t^cRO FILL SUXTlM 


7496 


037526 


000000 






lOnOOc: 


.WORD 


0 


. Ul 1MB CD nT^ T TC T/1 T wBC 

t iNUnBcR Or DIGITS TO TYPE 


7497 










.SBTTL 


TRAP DECODER 




7498 


















7499 


















7500 










J •THIS 


ROUTINE MILL PICKUP THE 


LUWcH oTIc inc iHW XNbiKULlXUN 


7501 










!*ANO USE IT TO 


INDEX THROUGH 


ruC TD AD T ADi C PAD TljCT f T AD T Tk.^ An^DC f f 

inE TRAP TAoLC FOR Trie STAR TING AOORESS 


7502 










i*OF THE DESIRED ROUTINE. THEN 


1 TkJf Anr\Dfff /IDTATkJCn TT ijTI 1 

USING THE ADDRESS OBTAINED Ii WILL 


7503 










:*G0 TO 


THAT ROUTINE. 




f 504 


















/505 


037530 


010046 






»TRAP: 


HOV 


RO.-(SP) 


C A\iC Da 

1 1 SAVE RO 




037532 


016600 


000002 






MOV 


2(SP).R0 


. .^CT TBAO Af%f\DCCC 

llGET TRAP ADDHcbb 


7507 


037536 


005740 








TST 


-(RO) 




7508 


037540 


111000 








HOVB 


CRO>.RO 


1 iGcT RIGHT BYTE OF TRAP 


7509 


037542 


006300 








ASL 


RO 


t tPUSI T ION FOR INDEXING 


\ t\ 
'DlO 


0^7544 


016000 


037564 






MOV 


tTRPAOCRO).RO 


It INDEX TO TABLE 


7511 


037550 


000200 








RTS 


RO 


ItGO TO ROUTINE 


«51^ 




































i5 14 










! jTHlS 


IS USE TO HANDLE THE "CETPRI" HACRO 


'513 
















TCI £ 

'5l0 


037552 


011646 






»TRAP2: 


HOV 


CSP). -CSP) 


ilHDVE THE PC OOUN 


•51 / 


037554 


OIoooo 


000004 


000002 




HOV 


4(SP).2(SP) 


1 iHOVE THE PSU DOUN 


TCI tt 


037562 


000002 








RTI 




II RESTORE THE PSU 


















f 5«:0 










.HACRO 


SET TRAP 


A.B.HSG 




'5^1 












tlSET 


A.B.\<TilAP*tTRP».NtTRf>.<NSG> 












.NLIST 








f 523 










$TRP-$TRP*1 
















.LIST 








7525 










.ENDM 


SET TRAP 






7526 










.HACRO 


ttSET 


A.B.C.O.COMNT 




7527 










.IF EQ 


$TRP-1 




7528 










.SBTTL 


TRAP TABLE 





7529 

7530 s*THIS TABLE CONTAINS THE STARTING ADDRESSES OF THE ROUTINES CALLED 



GLOBAL AREAS 
KOJllA.MAC 



fill 



MACni 30 AC 1052) 
15 MAR 84 15:51 



15 -MAR 84 
TRAP 



ER 



PAGE 142 



SEQ 0142 



7531 

7532 

7533 

7534 

7535 

7536 

7537 

7538 

7539 

7540 

7541 

7542 

7543 

7544 

7545 

7546 

7547 

7548 

7549 

7550 

7551 

7552 

7553 

7554 

7555 

7556 

7557 

7558 

7559 

7560 

7561 

7562 

7563 

7564 

7565 

7566 

7567 

7568 

7569 

7570 

7571 

7572 

7573 

7574 

7575 

7576 

7577 

7578 

7579 

7580 

7581 

7582 

7583 

7584 

7585 

7586 



O.J 7564 
05 7566 
037570 
037572 
037574 
037576 



J ♦BY THE "TRAP" INSTRUCTION. 

I ROUTINE 

»TRPAO: .UORO »TRAP2 
.ENOC 

.IIF NOF GNS..NLIST 

A- C 
.IIF NOF GNS..LIST 

B iiCALL-A 
.ENOM USET 
.MACRO TRMTRP 
»TERM-.-»TRPAD 
.ENOM TRMTRP 
.SBTTL TRAP TABLE 

:*THIS TABLE CONTAINS THE STARTING ADDRESSES OF THE ROUTINES CALLED 
s*BY THE "TRAP" INSTRUCTION. 



TRAP»0(C^ 



COMNT 



037552 
036502 
037326 
037302 
037342 
037056 



•TRPAO; 



ROUTINE 

.WORD 

»TYPE 

ITYPOC 

I TYPOS 

ITYPON 

•TYPOS 



ITRAP2 

I jCALL»TYPE 

t iCALL-TYPOC 

1 1 CALL -TYPOS 

llCALL-TYPON 

I iCALL-TYPOS 



TRAP ♦1(104401) 
TRAP »2( 104402) 
TRAP»S( 104403) 
TRAP »4( 104404) 
TRAP»5( 104405) 



TTY TYPEOUT ROUTINE 

TYPE OCTAL NUMBER (UITH LEADING ZEROS) 
TYPE OCTAL NUMBER CNO LEADING ZEROS) 
TYPE OCTAL NUMBER CAS PER LAST CALL) 
TYPE DECIMAL NUMBER (WITH SIGN) 



.SBTTL APT COMMUNICATIONS ROUTINE 



037600 


112767 


000001 


000236 


♦ATYl: 


MOVS 


•I.IFFLG 1 


037606 


112767 


000001 


000226 


♦ATY5: 


MOVB 


•I.IMFLG 1 


037614 


000403 








BR 


♦ATYC 


037616 


112767 


000001 


000220 


•ATY4: 


MOVB 


♦I.IFFLG 1 


037624 








♦ATYC: 




037624 


010046 








NOV 


RO.-CSP) i 
RL.-(SP) 1 


037626 


010146 








MOV 


037630 


105767 


000206 






TSTB 


»MFLC ) 


037634 


001450 








BEQ 


St 1 


037636 


122767 


000001 


141154 




CMPB 


♦APTENV.IENV i 


037644 


001031 








BNE 


3« 1 


037646 


132767 


000100 


141145 




BITS 


•APTSPOOL.IENVM i 


037654 


001425 








BEQ 


3« 1 


037656 


017600 


000004 






MOV 


84(SP).R0 ) 


037662 


062766 


000002 


0O0004 




ADO 


♦2.4CSP) 


037670 


005767 


141104 




11: 


TST 


tMSGTYPE 1 


037674 


00137b 








BNE 


1« 1 


037676 


010067 


141112 






MOV 


RO.IMSGAD 1 


037702 


105720 






21: 


TSTB 


(RO)* 1 


037704 


001J76 








BNE 


2« 


037706 


166700 


14110? 






SUB 


IMSGAO.RO 1 


037712 


006200 








ASR 


RO 1 


037714 


010067 


141076 






MOV 


RO.tMSGLGT i 


037720 


012767 


000004 


141052 




MOV 


•4, tMSGTYPE 1 



TO REPORT FATAL ERROR 
TO TYPE A MESSAGE 

TO ONLY REPORT FATAL ERROR 

PUSH RO ON STACK 
PUSH Rl ON STACK 
SHOULD TYPE A MESSAGE? 
IF NOTt BR 
OPERATING UNDER APT? 
IF NOT: BR 

SHOULD SPOOL MESSAGES? 

IF NOT: BR 

GET MESSAGE AOOR. 

tiBUMP RETURN AOOR. 
SEE IF DONE U/ LAST XMISSION? 
IF NOT: UAIT 
PUT AOOR IN MAILBOX 
FIND END OF MESSAGE 

SUB START OF MESSAGE 
GET MESSAGE LNGTH IN WORDS 
PUT LENGTH IN MAILBOX 
TELL APT TO TAKE MSG. 



Nil 



glocal areas 

KOJllA.MAC 



MACYll 30A(1052) 
15-nAR 84 15:51 
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APT COMMUNICATIONS ROUTINE 



SEO 0143 



7587 


037726 


000413 








BR 


5» 




7588 


037730 


017667 


000004 


000016 


3$: 


MOV 


84(SP).4t 


tiPUT MSG AOOR IN JSR LINKAGE 


7589 


037736 


062766 


000002 


000004 




ADO 


♦2.4CSP) 


mBUMP RETURN ADDRESS 


7590 


037744 


016746 


140026 






MOV 


177776, -(SP) 


1 iPUSH 177776 ON STACK 


7591 


037750 


004767 


176526 






JSR 


PC.* TYPE 


II CALL TYPE MACRO 


7592 


037754 


000000 






4»: 


.WORD 


0 




7593 


037756 








5t: 








7594 


037756 


105767 


000062 




lot: 


TSTB 


IFFLG 


iiSHOULO REPORT FATAL ERROR? 


7595 


037762 


001416 








BEQ 


12$ 


iiIF NOT: BR 


7596 


037764 


005767 


141030 






TST 


$ENV 


1 {RUNNING UNDER APT? 


7597 


037770 


001413 








BEQ 


12$ 


i;IF NOT: BR 


7598 


037772 


005767 


141002 




lit: 


TST 


$MSGTYPE 


t {FINISHED LAST MESSAGE? 


7599 


037776 


001375 








BNE 


11* 


II IF NOT: WAIT 


7600 


040000 


017667 


000004 


140774 




MOV 


84(SP).$FATAL 


II GET ERROR « 


7601 


040006 


062766 


000002 


000004 




ADO 


♦2.4(SP) 


It BUMP RETURN ADDR. 


7602 


040014 


005267 


140760 






INC 


tMSGTYPE 


II TELL APT TO TAKE ERROR 


7603 


040020 


105067 


000020 




12$: 


CLR6 


$FFLG 


II CLEAR FATAL FLAG 


7604 


040024 


105067 


000013 






CLRB 


$LFLG 


1 t CLEAR LOG FLAG 


7605 


040030 


105067 


000006 






CLRB 


*MFLG 


1 1 CLEAR MESSAGE FLAG 


7606 


040034 


012601 








MOV 


(SP)».R1 


II POP STACK INTO Rl 


7607 


040036 


012600 








MOV 


(SP)».RO 


1 iPOP STACK INTO RO 


7608 


040040 


000207 








RTS 


PC 


1 1 RETURN 


7609 


040042 


000 






$MFLG: 


.BYTE 


0 


ilMESSG. FLAG 


7610 


040043 


000 






tLFLG: 


.BYTE 


0 


iiLOG FLAG 


7611 


040044 


000 






♦FFLG: 


.BYTE 


0 


jiFATAL FLAG 


7612 




040046 








.EVEN 






7613 




000200 






APTSI2E 


-200 






7614 




000001 






APTENV- 


001 






7615 




000100 






APTSPOOL-100 






7616 




000040 






APTCSUP 


-040 







7617 
7618 
7619 
7620 
7621 
7622 
7623 
7624 
7625 
7626 
7627 
7628 
7629 
7630 
7631 
7632 
7633 
7634 
7635 
7636 
7637 
7638 
7639 
7640 
7641 
7642 



!thIS routine will increment the error COUNT AND THEN PASS THE UNIQUE 
{ERROR NUMBER TO THE APT ERROR ROUTINE TO BE REPORTED TO THE APT SYSTEM. 



040046 


005267 


141000 




$ERROR: 


INC 


$ERFLG 


{INCREMENT ERROR FLAG 


040052 


001775 








BEQ 


$ERROR 


lOON' T LET IT GO TO ZERO 


040054 


005267 


140764 






INC 


ERRCNT 


. ICREMENT THE ERROR COUNT 


040060 


021627 


001002 






CMP 


(SP). #1002 


lis ERROR FROM VECTOR AREA 


040064 


101010 








BHI 


1$ 


»IF YES THEN 


040066 


012767 


007777 


000106 




MOV 


♦7777. 3$ 


{REPORT AN UNEXPECTED TRAP 


040074 


012637 


001062 






MOV 


(3P)».»#SAVSP1 


iSAVE UNEXPECTED TRAP DATA 


040100 


012637 


001064 






MOV 


<SP)*.8«SAVSP2 


{AND RESTORE SP 


040104 


000430 








BR 


2$ 


{ELSE 


040106 


017667 


000000 


000066 


1$: 


MOV 


8(SP). 3$ 


{REPORT UNIQUE ERROR NUMBER ^0 APT 


040114 


011667 


000072 






MOV 


(SP).101$ 


{SAVE ERROR PC 


040120 


062716 


000002 






ADO 


♦2. (SP) 


{GET OVER UNIQUE ERROR NUMBER FOR RETURN 


040124 


017637 


000000 


040134 


100$: 


MOV 


S(SP).M102$ 




040132 


104401 








TYPE 




{TYPE ERROR MESSAGE 


040134 


000000 






102$; 


.UORD 


0 




040136 


062716 


000002 






ADD 


•2.(SP) 


{GET OVER ERROR MESSAGE 


040142 


104401 


002046 






TYPE 


.ERRl 




040146 


016746 


000030 






MOV 


3$.-(SP) 


IpuSM UNIQUE ERROR NUMBER ON THE STACK 


040152 


104402 








TYPOC 




(TYPE OCTAL ERROR NUMBER 


040154 


104401 


002062 






TYPE 


.ERR2 




040160 


016746 


000026 






MOV 


101$. -(SP) 


|PUSH ERROR PC ON THE STACK 


040164 


104402 








TYPOC 


iTYPE THE ERROR PC 
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7643 


040166 


& C £ 'Of VVVVW 1 






•APTtNV , iCNv 


7644 


0401 74 






oNt 


5» 


7645 


040176 


004 767 1 




■ CD 


a A T w ii 

PC i •ATV4 


7646 


VC Vt 


www 




, HUHU 


0 


764 7 


040204 


000777 




no 
OK 


^ 1 


"648 


040206 




5): 




7649 


040210 






RTI 




7650 


040212 


000000 


101): 


.WORD 


0 


"651 


040214 




IPATCH: 






^65^ 


040214 


000010 


' .BLKU 


10 


■•655 




000001 


.END 



StQ 0144 



I CHECK TO MAKE SURE WE RE IN APT MODE 

lir TES THEN 

iGO REPORT ERROR TO APT 

I STORAGE FOR ERROR NUMBER 

•LOOP HERE AFTER REPORTING ERROR TO APT 

I IF NOT APT THEN HALT 

I ALLOW RECOVERY FROM HALT 



KOJUA, 



ABASE 

ACDWl 

ACDUJ 

ACPUOP 

AODT 

AODWO 

AOOul 

AOOUlO 

AOOWll 

AD0U12 

A00U13 

AO0U14 

A00U15 

AOOW? 

A00U3 

AO0U4 

A00U5 

A00U6 

A00U7 

A00U6 

A00U9 

AOEVCT 

ADEVM 

AENV 

AENVn 

AFATAL 

ALLCTR 

AMAORl 

AMA0P2 

AMAOPS 

AMA0R4 

ANATISl 

AMAMSa 

AHAnS3 

AnAKS4 

AHSGAO 

AWSGLG 

AMSGTt 

AHTrPl 

AMT TP2 

AMTYP3 

AnTrP4 

APASS 

APftZCW 

APTCSU 

APTENV 

APTSIZ 

APTSPO 

ASUREG 

ATESTN 

AUNIT 

AUSUR 

AVECTl 

AVECT2 

BE VENT 

BFA 



ARt « fif*L 1 1 1 
MAC IS MAR H4 




15 MAR 


cfiSss'fc^lRtfie^^ 




000000 


54 7 










000000 


54 7 










000000 


54 7 










000000 


547 


562 








003556 


1093 


1091 


1099 


1107 


1116 


000000 


547 










000000 


547 










000000 


547 










000000 


547 










000000 


547 










000000 


547 










oooooo 


547 










000000 


547 










oooooo 


547 










oooooo 


547 










oooooo 


547 










oooooo 


54 7 










oooooo 


54 7 










oooooo 


547 










oooooo 


547 










oooooo 


547 










oooooo 


547 


553 








oooooo 


547 










oooooo 


547 


558 








oooooo 


547 


559 








oooooo 


547 


550 








001056 


589# 










oooooo 


547 










oooooo 


547 










oooooo 


547 










oooooo 


547 










oooooo 


547 










oooooo 


547 










oooooo 


547 










oooooo 


547 










oooooo 


547 


555 








oooooo 


547 


556 








oooooo 


547 


549 








oooooo 


547 










oooooo 


547 










oooooo 


547 










oooooo 


547 










oooooo 


547 


552 








oooooo 


547 










000040 


7276 


7616« 








000001 


7269 


7572 


7614* 


7643 




000200 


867 


761S# 








000100 


7271 


7574 


7615* 






oooooo 


547 


560 








oooooo 


547 


551 








oooooo 


547 


554 








002000 


466« 


547 


561 






oooooo 


547 










oooooo 


547 










177546 


458* 










GO 3610 


1077 


1085 


1093 


1101 


uio 



J. c 

USER STHBOIS 



11S2* 



SEO 0145 



1119 



USB* 
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Bf-ACl 

BrAC4 

SrACS 

BrAE 

BfB 

BITO 

BITOO 

BITOl 

BITO^ 

BIT03 

BIT04 

8IT05 

BIT06 

BITO-' 

BIT08 

BIT09 

BIT! 

BITIO 

BITll 

BIT12 

BIT13 

BIT14 

Bins 

BIT2 

BIT3 

BIT4 

BITS 

BTT6 

BIT7 

BIT8 

BIT9 

BOARD T 

BPTVEC 

BTER 

BTEXP 



BTGO 
BTRES 



BTTST 

Bi^TSTE 

BTl 

CACHET- 

CCR 

CHECK 7 

CtCClO 

CHEC26 

CHEC27 

CMECSO 

CHEC32 

CHEC53 



005552 
005576 
003422 
0O3446 
005474 
005650 
005646 
OOOOOl 
OOOOOl 
000002 
000004 
OOOOlO 
000020 
000040 
000100 
000200 
000400 
001000 
000002 
0C2000 
004000 
010000 
020000 
040000 
100000 
000004 
000010 
000020 
000040 
000100 
000200 
0OO400 
001000 
OOOOOl 
000014 
002650 
001066 



002450 
001076 



003150 
003176 

U 

OOOOOl 

177746 
005152 
005366 
010616 
011162 
Oll^iJO 
012166 
012464 



1078 
1086 
1094 
1102 

nil 

1120 
1139 
279# 
269 « 
268« 
267* 
266« 
265* 
2644 
263« 
262« 
261« 
260* 
278« 
259» 
258« 
257# 
2S6« 
255* 
254* 
2774 
276» 
275# 
2744 
273# 
2724 
2714 
2704 



IS MAR. 



10834 

10914 

10994 

11074 

11164 

1125 

1141 

279 
278 
277 
276 
275 
274 
273 
272 
271 
270 



USER SYMBOLS 



SEO 0146 



11484 
1143 



11454 



14 


509 


606 


761 












2664 


















934 


936 


938 


9414 












S964 


897 


915 


916 


919 


922 


925 


929 


955 


1058* 


1059» 


1060* 


1061* 


1062 


1065 


1068 


1070 


1072 


1130* 


1152* 


1155* 


1154* 


1135* 


11S8 


1140 


1142 


1144 


9024 


1017 
















5974 


898 


914* 


917* 


920* 


92S* 


955 


955 


957 


960* 


990* 


1000* 


102S 


1027 


1029 


1051 


1057 


1076* 


1118* 


1138 


1140 


1142 


1144 










954 


9^3 


972 


981 


991 


1001 


10254 






1026 


1028 


1050 


10524 












885 


















14 


156 


159 


177 


509 


594 


609 


752 


761 


7497 


















4524 


832* 


875* 














1474 


1478 


1486 


1490 


14964 










1545 


1549 


1557 


1561 


15674 










2321 


2532 


2343 


2556 


2S67 


25814 








2441 


2459 


2477 


24894 












2549 


2567 


2585 


25964 












2701 


2712 


2725 


27544 












2788 


2799 


2810 


28214 













955 
1074 



959 
1084* 



851 



957 
1127* 



955* 
1092* 



874 



959 
1128* 



962* 
1100* 



7194 



1056 
1129* 



9^1 » 
1109* 



?245 
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CROSS Rtr tRFNCE i ABl E 


CHtK 


005136 




14979 


1503 








CMKIO 


005404 




1569 


1574« 








CHK7 


005150 




1498 


1503« 








CMIO 


005372 




1566* 


1574 








CLRO • 


*••••• 


u 


5609 










CLRI • 


•*«••• 


g 


5840 










CMPO • 


**«**« 


u 


4039 










CMPPTN 


017 730 




4047 


4056 


4065 


4073 


4095* 




001040 




561* 


817* 


822* 


623* 


2919 








3211 


3229 


3263 


3282 


3313 








3512 


3550 


3575 


3597 


3619 








3668 


3906 


3938 


3968 


4006 








5506 


5517 


5622 


5762 


5824 


CPEREG« 


77766 




455* 










CPUTST- 


000001 




!• 


166 


509 


603 


756 


CR " 


0000 IS 




194« 


752 


756 


761 


763 


CRtr ■ 


000200 




195# 


7286 


7344 






OATRAM' 


000001 




1# 


874 








DATVER 


002146 




820# 


2918 


2963 


3003 


3039 








3261 


3312 


SS31 


3356 


3370 








3596 


3618 


3650 


3669 


3696 








3967 


4005 


4029 


4121 


4559 


DATVf R 


002130 




81S# 


4360 


4778 


5205 


5216 


DATl 


002160 




818 


823« 


826 






DCOUNT 


001054 




588* 










DDISP » 


177570 




201* 


585 


848 






displa 


001050 




585* 


848* 


856* 






DISPRE 


000174 




495* 


856 








DIVO « 


****** 


u 


4381 










Divr ■ 


****** 


u 


4133 










D5UR • 


177570 




200# 


584 


847 






DVDSUB 


022000 




4389 


4401 


4413 


4424 


4435 




A ^^^^^^ 

021002 




4141 


4151 


4160 


4168 


4177 








4250 


4258 


4267 


4276 


4285 


01 


004236 




1275# 


1291 


1296 






02 


004250 




1278* 


1279* 








OS 


004252 




1280# 


1304 








04 


004270 




1288* 


1325 


1331 






05 


004304 




1289 


1292* 








D6 


004314 




1293 


1295* 








D ' 


004320 




1294 


1297# 








EMTVEC« 


000030 




289# 


836* 


837* 






ERR 


002126 




794* 










ERRCNT 


001044 




583* 


7623* 








tRMr P 


002124 




793* 










ERBnSG 


001766 


G 


752* 










tnHNUn* 


000514 




465* 


785 


78e# 


941 


AAV ^ 

945* 








993 


9964 


1005 


10064 


« AVA 

1079 








1115* 


1121 


11244 


• • tS 

1175 


1178* 








1254 


12S7# 


1284 


1287* 


1306 








1344* 


1364 


13674 


1371 


1374* 








1429 


1432* 


1448 


14524 


1499 








1619* 


1623 


16<CD# 


1092 


16^:^9* 








1708 


17124 


1737 


17404 


1745 








1601* 


1805 


18064 


1813 


1616* 








1873 


16764 


1880 


IS834 


1869 
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USER SYMBOLS 



2964 


3004 


3040 


3070 


3106 


3144 


3175 


3194 


3332 


3357 


3371 


3403 


3415 


3431 


3444 


3476 


3651 


3670 


3697 


3711 


3742 


3760 


3805 


3843 


4030 


4122 


4361 


4560 


4779 


4967 


5206 


5217 


6191 


6369 


6498 


6797 


7026 








877 


7233 














766 


7233 


7241 


7332 


7344 








3069 


3105 


3143 


3174 


3193 


3210 


3226 


3262 


3402 


3414 


3430 


3443 


5475 


3511 


3549 


3574 


3710 


3741 


3779 


3804 


3842 


3867 


3905 


3937 


4966 


5505 


5516 


5621 


5823 


6190 


649'' 


6796 


5761 


6368 


7025 












4446 


4457 


4468 


4460 


4506* 








4165 


4193 


4201 


4209 


4217 


4225 


4233 


4241 


4307* 
















956 


959* 


965 


968* 


974 


977* 


983 


966* 


1062* 


1087 


1090* 


1095 


1096* 


1103 


1106* 


1112 


1208 


1211* 


1226 


1231* 


1256 


1239* 


1246 


124<»* 


1309* 


1314 


1317* 


1326 


1530* 


1333 


1337* 


1340 


1300 


1384* 


1404 


1407* 


1412 


1415* 


1421 


1424* 


1502* 


IS06 


1510* 


1570 


1573* 


1577 


158l» 


1616 


1658 


1661* 


1685 


1688* 


1692 


1693* 


1699 


1702* 


1746* 


1752 


1755* 


1761 


1765* 


1791 


1794* 


1708 


1820 


1823* 


1829 


1833* 


1858 


1861* 


1665 


1868* 


1693* 


1919 


1922* 


1925 


1928* 


1952 


1935* 


1940 
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I Ll. 



USER SYMBOLS 



StQ 0146 



ERRTN • 

ERRVEC* 

ERR I 

ERR2 

EXPOAT 

TACU • 

FINl 

TIN 10 

riNll 

riNl3 

riNi4 

FIN15 
FIN16 
flHl-' 
FIU2 



000000 
000004 
002046 
002062 
001034 

OOS742 
005450 
005560 
006004 
006160 
006400 
006572 
007006 
004044 



1945* 
2017 
20894 
2165 
22764 
2351 
24574 
2562 
26604 
2792 
28874 
2966 
30454 
3139 
32084 
3284 
33764 
3478 
35394 
3613 
37024 
3782 
36484 
3932 
40034 
4332 
45344 
4759 
49704 
5199 
54664 
5630 
57794 
5860 
59364 
6011 
60714 
6144 
63744 
6776 
70114 
4634 
2624 
7614 
7634 
5794 
1040 
1169 
1565 
1630 
1706 
1759 
1827 
188/ 
1954 
1199 



1947 

r0214 

ill5 

21894 

2281 

23544 

2463 

25654 

2664 

27954 

2906 

29694 

3063 

31424 

3213 

32874 

3397 

34814 

3543 

36164 

3713 

37854 

3862 

39354 

4006 

43354 

4540 

47624 

4980 

52024 

5499 

56344 

5796 

56634 

5941 

60144 

6069 

61474 

6360 

67794 

7019 

845 
7637 
7640 



11604 
15964 
16564 
17154 
17664 
16364 
18964 
19634 
12134 



19504 


1956 


19604 


1965 


19864 


1993 


19964 


2001 


20044 


2008 


20114 


2046 


20514 


2055 


20584 


2062 


20654 


2069 


20724 


2076 


20794 


2085 


21184 


2123 


21264 


2J50 


21554 


2159 


21454 


2169 


21724 


2176 


21794 


2216 


22194 


2225 


22264 


2229 


22524 


2256 


2239* 


2245 


22494 


2275 


22644 


2289 


22924 


2296 


22994 


2516 


25194 


25':' 7 


25304 


2538 


25414 


2362 


23654 


2372 


25754 


2384 


25874 


2457 


24404 


2445 


24484 


2454 


24664 


2472 


24754 


2481 


24844 


2495 


24964 


2545 


25484 


2555 


25564 


2571 


25744 


2580 


25854 


2589 


25924 


2600 


26054 


2650 


26554 


2657 


26674 


2674 


26784 


2705 


27084 


2716 


27194 


2727 


27500 


2738 


27414 


2803 


28064 


2814 


28174 


2825 


28284 


2871 


28744 


2878 


28814 


2684 


29094 


2912 


29154 


2922 


29254 


2945 


29464 


2951 


29544 


2957 


29604 


2992 


29954 


2996 


50014 


5006 


50094 


5028 


50514 


5054 


50374 


3042 


30664 


3072 


50754 


5094 


50974 


5100 


51054 


5108 


31114 


3151 


31344 


3146 


31494 


5166 


51714 


5177 


51804 


5169 


51924 


5196 


31994 


3205 


32164 


3224 


52274 


5251 


52544 


5257 


52604 


5265 


52664 


3276 


52794 


3308 


33114 


5515 


55184 


5526 


55294 


5554 


55574 


5559 


336^9 


3573 


34004 


3405 


54084 


5417 


54204 


5455 


34364 


3446 


54494 


5470 


34734 


3469 


34924 


5498 


55014 


5505 


55084 


3514 


55174 


5527 


55504 


3536 


35464 


3552 


55554 


5569 


55724 


5577 


55604 


5591 


55944 


5599 


56024 


3621 


36244 


5645 


56484 


5655 


56564 


5664 


56674 


5672 


56754 


3699 


37164 


3736 


57594 


5744 


57474 


5757 


57604 


5766 


57694 


5775 


37764 


3799 


36024 


5607 


56104 


5620 


56254 


5629 


56524 


5656 


58594 


3845 


36654 


5670 


56754 


5665 


56664 


5694 


56974 


5900 


59054 


5906 


59114 


3940 


39454 


5955 


59564 


5962 


59654 


5970 


59754 


5964 


59674 


4000 


40114 


4024 


40274 


4052 


40554 


4112 


41154 


4124 


41274 


4525 


45264 


4341 


45444 


4554 


45574 


4365 


45664 


4574 


45774 


4522 


45254 


4551 


45434 


4555 


45564 


4562 


45654 


4575 


45764 


4741 


47444 


4750 


47534 


4772 


47754 


4761 


47644 


4795 


47964 


4949 


49524 


4956 


49614 


4967 


49634 


4969 


49924 


5001 


50044 


5167 


51704 


5? 76 


51794 


5185 


51864 


5206 


52114 


5219 


52224 


5250 


52554 


5467 


54704 


5476 


54794 


5485 


SS024 


5506 


55114 


5519 


55224 


5550 


55554 


5615 


56164 


5624 


5627* 


5726 


57294 


5755 


57564 


5744 


57474 


5755 


57564 


5764 


57674 


5776 


57994 


5602 


56054 


5826 


56294 


5S55 


58364 


5655 


56564 


5859 


56624 


5886 


56694 


5692 


56954 


5900 


59054 


5921 


59244 


5927 


59304 


5933 


59444 


5964 


59(>74 


5970 


59754 


5976 


59794 


5964 


59674 


6005 


60084 


6017 


60204 


6C>25 


60264 


6046 


60514 


6054 


60574 


6060 


60634 


6068 


60924 


6095 


60964 


6101 


61044 


6109 


61124 


6152 


61554 


6156 


6141* 




61554 


6176 


61794 


6165 


61664 


6193 


61964 


636? 


63654 


6371 


63634 


6491 


64944 


6500 


65054 


6509 


65124 


6756 


676 1» 


6767 


6770* 


6790 


67954 


6799 


66024 


6611 


66144 


6990 


69954 


6999 


70024 


'008 


70224 


7026 


70S14 


7040 


704S4 


7169 


71724 


7176 


71794 


7185 


71884 


646* 


657* 
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HfcNC 



USER STMBOLS 



SEQ ni4 



► IN^U 






20?A# 
























f T%aO 1 
^ liHc 1 


XA 




3nQ3A 


























f OlO 






























UU f f 




31 Q1 A 


























^1 /M 




33^3A 
cc3cv 




























3X70 


3A 1 *\A 


























All 


3AA7 


3S3XA 






























3AXnA 


























Oil ' 


CO f c 


3&A1 A 


























A1 337n 
vice ( U 


37X3 
c r 3^ 


37<<AA 
c f OOw 


























UlcDOO 




3A<\^A 

c033w 






























1 XAAA 




























1 X7A 


1 XRf.A 
























^ lrK> 


AAA 7i^A 


r 


1 A<^A 
























C* TUT 






1 ^3^A 

13c3v 


























AA1 AA3 


90CW 


AnAA* 
^U^O* 


*v3 j» 


AAAAa 
*VO^* 


A1 1 A 
^llO 


Al AA* 


A ISA* 
* 13V» 


A 1 SO* 


Al A7* 
^ lO » • 


Al 7Aa 
m 1 f o* 


A* AA* 










ASAAa 


A31 4La 


A 33 A* 


A3X3A 


A3AAa 


A3AO* 
^C^ 


^C3 f • 


A3AAA 
^COO* 


*c f 3» 


A3AA A 


AX31 


A TTA 


A 7 






AXAAa 


AAnn* 


AA1 3a 

**xe» 


AA3Xa 


AAXAa 


AAAS« 


AASA* 
^^30* 


AAA 7* 


AA 7Q* 


AS3A 


AS30 




7 A 








A&DXa 
^OwO* 


AA1 1 * 


AA1 Qa 


AA37A 
^Oc • • 


AAXSa 


AAAX* 


AASi * 
^031* 


AASQa 


AAA 7 A 
^OO ' • 


AA7S* 
*0 ' 3* 


AAAAa 


#0" J* 






^ f wc* 


A7XQ 


A7AA 


m f 03 


^o\^» 


AMI 7* 


AA3A* 


AAX4* 

^O 


AASA* 


AAA1 A 


AA73* 
^O ' c* 












AOA7 


AO^ 


AOQX 


KA1 A« 
3V1^» 


^3Xa 
3Vc3* 


SAX?* 

3V3C* 


SAA1 A 

3V*1» 


SASA* 
3V3V* 


SAAA* 


SAAQ* 


/ O* 










31v3* 


SI 1A* 
31 1^» 


31c3* 


3103 


%t 7A 

31 


S33X 

3CC3 


S3A7* 
3C^ 1 • 


S3AA* 


S37X* 
3C • 3* 


S3MA* 
3CDO* 




J Jit • 








^XXA« 


3331* 


SXAA* 
330^* 


33 • O* 


33*1* 


SAAS* 

3^V3* 


SA14* 

3^lTr* 


SAAS 
3^03 


SA7A 
3^ 


SS3X 

33c 3 










JOOc • 


^i;7n* 


30 » 


3000» 


S73A 

3 f C^ 


3 ■ 33 


3 >00 


AS3A* 


ASXA* 

033^* 


ASAA* 


ASSA* 
033^» 












OJyO* 


OOV 1 • 


OOlO* 


AA3Q* 


AAX4tt 

0037* 




AAAA* 
ooov* 


AA71 * 

OO » 1^ 


AAA1 * 
OOOl • 


AAQ3* 

007C* 




tf^7l X* 

O ' io» 






A 7^ 


O r03 


OOw3 


oo«o* 


AAXA* 

003W 


AAA3* 

Ov^C* 




AASA* 


AAAA* 


AJI7A* 
OO 


AAA3* 

oooc* 












f<41 Aa 


O »fcC* 


O »3V* 


0^30* 




o»oo 




7053 

< V3C 


7 ASS* 

• V33* 


7AAX* 
r V03* 








Wcvld 




7A7 

• Of 


QAA 


oca 

T30 


M7 

»o • 


07A 

▼ f o 


^^03 


04S 

tt3 


1 AAS 


1 AA1 
IVOl 


1 AAQ 

1W07 


1 nQ7 


1 1 A^ 






1 1 1 A 


1 1 3X 


1 1 77 
11 • ■ 


ICIV 


13XA 

1C3V 


1 ^SA 

li£30 


1 3AA 
IC^O 


13SA 
1C30 


1 3AA 

icoo 


1 XAA 

1 3VO 


1 XI A 
1310 


1 


1 XXA 






1 XAX 


1 XM 
lOOO 


X J ■ J 


1303 




t AIA 

1^ 1^ 


1A3X 
1^C3 


1 AXI 
1^31 


1 ASI 

1^31 


1SA1 
13V1 


1 SAQ 
13V7 


1 

13 ' c 


1 JOW 






1 i^l A 


10c3 


103* 


1 AAA 
lOOV 


lOO ' 


1 AOA 
lO^^ 


1 7A1 
1 rVl 


1711 
I'll 


1 7XQ 

1 f 37 


1 7A7 
1 •* » 


1 7SA 

1 


1 f O* 


^ 7QX 








1 An7 

XOV f 


1013 


11133 
lOCC 


103C 


1 AAA 
lOOV 


1 AA7 

lOO • 


1A7S 
lO '3 


1 AA3 

looc 


1 AQ3 

107C 


1431 

l7Cl 


l"c ' 


1 QXA 






1 ttA3 


1 <kAQ 


1»3^ 


1 vO f 


lOM 


3AAX 
cW3 


3A1 A 
CVIV 


3A3A 
cVCV 


3ASA 
CV3V 


3AS7 

cV3 f 


3AAA 


^A71 








3AAA 


31 1 7 


31 3*i 


31 X3 
c 13c 


31 A3 
Cl^C 


31 71 
cl ' 1 


31 7A 
Cl 'O 


31 AA 

clOo 


331 A 
CClO 


333S 


33X1 
cc31 


CifyO 








337^ 
cc '3 


33AX 


3341 
c«t*l 


330fl 
CCvO 


3X1 A 

C310 


3X3Q 

C3Ct 


3XAA 
C3^V 


3XSX 

C333 


3XAA 
C30^ 


3X7A 
C3 t ^ 


3XAA 
C300 


OAXO 








3AOI 


3AA^ 


3A7A 


3AAX 
C^03 


3AQS 

C*t3 


3*tA7 
C3^ f 


C333 


3SAA 
C30* 


3S7X 
C3 « 3 


3SA3 


3S41 




CO JC 








cuw 


PA77 

CO • • 


P707 

C • w r 


3718 

C ' Iw 


C f c~ 


37AO 


374A 

C » 7^ 


3AAS 

COV3 


3A1A 
COlO 


3A37 
coc • 


Pfl7X 








eooo 


3QnA 


9Q1 A 




3<kA7 


C^33 


cT3t 


3^LA 


300A 


XAAA 


XAAA 

34WO 




XAX^ 






XAAA 


xnA<i 

0v03 


XA7A 


3v^l 


X1A3 

31VC 


X1 1 A 

311V 


XI XS 

31 33 


XI Al 

31^1 


XI AA 

31^0 


XI 7A 
31 rV 


XI 7Q 

31 • 7 


XI o . 

ji^i. 


Xt OA 










X33ik 
3ccO 


ac3* 


X3SQ 

3c3Tr 


S367 

3cO • 


S37A 

3c *0 


V3AA 
3cOO 


XXI A 

331V 


XXI 7 

331 f 


XX3n 

33^0 










XX7^ 


XXQO 


XAA7 


3^ 


3^33 


SAAA 

3^^0 


XA73 
3* rc 


SAAA 


XAQ1 
3*7l 


XSAA 
33VV 


XSA7 

33V ' 


X^l A 


J JC~ 






X^XA 


X^^ 


XSSA 

333^ 


X^7I 
33 ' 1 


5579 


33 » 3 


•3^9V1 


X<>1S 

3013 


XA3X 
30C3 


XAA7 
30^ ' 


XASS 

3033 




j^ • ^ 






X7A1 


X71^ 

3 f 13 


X7XII 

3 r 30 


X7AA 
3 '^O 


S759 


3 «00 


X77S 

3 r f 3 


3 


XAA1 

30V1 


XAA4 

30V7 


XA33 


XAXl 


XAXA 

JO JO 






<AA7 


XJIAA 


XA73 

30rc 


3003 


XAQA 


XQA3 
3^Vc 


XOtA 

3 7 IV 


XQXA 

3t3^ 


X4A3 


xoss 

3733 


3 




X<M^ 

J^'OO 






AnA3 


AAI t\ 


A03#> 
*VCO 


AAXA 
^V3^ 


Al 1 A 
^11^ 

• J ■ 3 

310~ 


A13A 
^ ICO 


AX3S 

^3C3 


AXXA 


AXAX 

^3^3 


AXSA 
*330 


AXAS 

^303 


AX7A 


^ JC"» 






A^XX 


A^A3 


* 333 


A<UA 


A7AX 

^ •^3 


A7S3 
^ ' 3e 


A7A1 
^ f Ol 


A77A 


A7AX 

^ f 03 


A74S 

* • 73 














A(M1 


SAAX 


SI 7A 

31 fO 


SI A7 

310 r 


S3A1 
3CV1 


S31 A 

3C1V 


S331 
3cCl 


S3X3 




J^ V 






^A7 


33vl 


331V 


33c 1 


333e 


SA1 7 

301 ' 


SA3A 
30cO 


s&xx 

3033 


3 < CO 


S7X7 

3 f 3 * 


S7AA 
3 '^O 


J ■ J ' 


J 'OO 






S77A 


3 fvO 


SAAA 

30V^ 


30c0 


3033 


3033 


SAA1 
300 1 


SAA3 


SAAA 


SA4A 


S4A3 


S<%PX 










3 


3^00 


SQ73 

37 rc 


<(4 7A 

3T r O 


S4AA 

3^rOO 


ow » 


AAt X 

OVl 3 


AA1Q 

OVl 7 


A037 
ovc • 


AASn 

OV3V 




A^Af.;^ 

OVwC 






AA7A 


&AQ1 


OW f 


A1 AX 
01V3 


Al 1 1 

Ol 11 


Al XA 
013^ 


Al AA 


AIAA 


A1SA 
013^ 


Al 7A 

0 1 f o 


A IAS 

O 103 




dJO~ 






<>X7X 

O^ * ^ 


AXn3 

030C 


&AQX 
O* '3 


A<^A3 
03Vc 


AS1 1 
031 1 


A7AA 
O 1 OV 


A7AQ 
O ■ O^ 


A77A 
O ' • O 


A7Q3 

O ' 7C 


AAA1 
OOV 1 


AA1 X 

0013 










7010 


7021 


70S0 


704P 


7171 


71 76 


71S7 














FPPTST- 




1 


166 


509 


596 


609 


610 


756 


761 


782 


877 


7255 






FPTSl - 




1152 


























rPTSlO« 




1527 
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SEQ 0150 



FPTSll 

rPTS12 

FPTS15 

FPTS14 

rPTSlS 

rPTSl6 

PPTS17 

*^PTS2 

rPTS20 

*-PTS2l 

rPTS22 

rPTS25 

FPTS24 

PPTS55 

rPTS26 

FPTS27 

FPTS5 

rpTSSO 

»^PTS31 

FPTS32 

FPTS53 

rPTS4 

FPTS5 

rPTS6 

FPTS7 

FPVEC 



FSRCnO- 
ONS 

HITMIS' 

HOPIO 

MOPll 

H0P12 

H0P13 

H0P14 

M0P15 

MOP 16 

M0P17 

M0PI8 

H0P19 

M0P20 

M0P21 

M0P22 

H0P44 

MT 

HrBRID- 

ILL 

ILLOPI 

ILL0P2 

lOTVEC- 

KDPARO' 

KDPARl* 

KDPAR2' 

KDPARS- 

K-DPAP4> 



«•••«• u 

**•*•* u 

u 

*••«** 0 

••**•• u 

••••*• u 
****** u 
*•••*• u 
****** u 
****** \J 

****** u 

****** u 
****** u 
****** u 
****** u 

****** 0 

****** u 

****** u 

****** u 
****** u 
****** u 

****** u 

****** u 

000244 



****** u 
****** u 

177752 
021244 
022242 
025504 
024336 
025436 
027136 
027456 
050144 
052464 
055106 
054552 
035622 
036274 
020056 
000011 
000001 
004544 
004340 
004434 
000020 
172360 
172362 
172364 
172566 
172570 



1598 
1658 
1665 
1717 
1770 
1858 
1898 
1182 
1965 
2026 
2095 
2148 
2195 
2254 
2502 
2417 
1215 
2525 
2652 
2685 
2770 
1261 
1548 
1588 
1456 
449« 
5150* 
6475* 
2857 
494 
454* 
4294 
4492 
4712 
4919 
5155 
5434 
5585 
5695 
6329 
6459 
6725 
6955 
7159 
4080 
192* 
1* 
1556 
1270 
1274 
287« 
450* 
451* 
452* 
455* 
4349 



5485* 
5450* 
6740* 

7553 

4580* 
4579# 
4796* 
5006* 
52S6* 
5536* 
5637* 
5782* 
6385* 
6515* 
6817* 
7046* 
7192* 
4129* 
7284 

471 
1380* 
1304* 
1540* 

871* 



3521* 
5599* 
6971* 

7554 



5561* 5754* 
5711* 5875* 
7153* 



7555 



7556 



5789* 
5916* 



7557 



5814* 
5959* 



5852* 
6000* 



587 7* 
6045* 



4508* 
6084* 



4507* 
6127* 



4726* 
6168* 



4954* 
6346* 



7542 
604 



872* 



874 



7205 



7221 



72S5 



7246 



7497 



7560 



KOJllA.MAC 



15 MAR 84 15:51 



MAR 64 16:5S PAGE 152 
CROSS REFERENCE TABLE 



USER SYMBOLS 



SEO mil 



K0P4RS< 
K0PAR6< 
KDPAR7> 
KOPORO' 
KOPORl' 
KDPDR2' 
KDPDR3' 
KDP0R4< 
K0P0R5' 
KDP0R6> 
K0P0R7" 
KIP ARC 
KIPARI' 
KIPAR2< 
KIPAR3' 
KIPAR4' 
KIPAR5> 
KIPAR6' 
KIPAR7> 
KIPORO- 
KIPORl- 
KIP0R2' 
KIP0R3" 
KIP0R4< 
KIP0R5" 
KIP0R6> 
KIP0R7. 
LCD 
LCOSUB 
LCr 

LCTSUB 

LOG 

L0C2 

LOOMS 

LOOMS 

LOOm 

LOOMS 

LOOMb 

L00ri7 

L0ri27 

LF 

LOOPIN 

LOST 

LSI 

LS2 

LS3 

LS4 

LS5 

LS6 

LS7 

LXP 

LXPSUB 

MACE 
MACO 



172572 

172574 

172576 

172520 

172522 

172324 

172526 

172330 

172532 

172354 

172536 

172340 

172342 

172344 

172346 

172350 

172552 

172554 

172556 

172300 

172502 

172304 

172506 

172510 

172512 

172514 

172516 

****** (J 

052760 

****** U 

052536 

•••*•* u 
****** u 
•***•• u 
****** u 
****** u 

****** u 

****** u 
****** u 
****** (J 

000012 
001060 
005722 

****** u 

****** u 
****** u 
****** u 

****** u 

****** u 

****** u 
****** u 

054262 

002610 
002500 



455* 

456« 
457* 
408* 
4094 
4104 
411* 
4124 
4154 
4144 
4154 
4194 
4204 
4214 
4224 
4254 
4244 
4254 
4264 
5974 
5964 
5994 
4004 
4014 
4024 
4054 
4044 
6567 
6594 
6201 
6206 
6266 
5915 
6159 
2891 
2928 
2972 
5012 
5046 
5076 
5114 
1954 
5904 
1160 
5666 
5907 
5948 
5991 
6052 
6075 
6116 
6517 
6525 
6661 
915 
911 



6401 

6214 
6292 



6406 

6220 
6296 



6415 

6226 
6504 



6422 

6232 
6510 



642« 

6256 
6516 



64S6 

6244 

6522 



6445 

6250 
65454 



6450 

6256 



64744 

6262 



6266 



6274 



6260 



752 
1162 



756 
1164 



^61 
1166 



76^ 
1171* 



7o6 



725S 



241 



7556 



7344 



6555 
6672 
918 
9134 



6545 
6662 
921 



6555 6565 
6695 670Y 
924 9554 



6575 
6714 



6566 

67Soa 



6597 



6608 



6619 



o650 



«>t>40 



6650 



oLOBAl 


AREAS MACUl 


30A( 10b2 ) 


15 MAR 


84 16 




MAC IS MAR 84 


15'51 




CROSS Rl 


MACOA 


002504 


914« 


928 


93? 


MAC I 


002514 


916* 






MAC2 


002530 


919» 






HAC3 


002544 


9224 






MAC4 


002560 


9254 






MACS 


002574 


9294 






MBTE 


003200 


1021 


10374 




MBTl 


002422 


8834 






MBT2 


002430 


8964 






MBT2A 


002442 


8994 


1022 




MBT8 


002656 


940 


9474 




MBTSA 


002712 


950 


952 


955 


MBTSe 


002740 


961 


964 


9694 


MBT8C 


002766 


970 


973 


9764 


MBT80 


003014 


979 


982 


9674 


MBTSE 


003044 


968 


992 


9974 


MBTar 


003074 


998 


1002 


10074 


MBT8FG 


003110 


1010 


10124 




MBT8I 


003134 


1016 


10194 




MCLRD 


030214 


58094 






MCLRI 


030306 


58404 






MCMPD 


017542 


40394 






MOOSUB 


026636 


5246 


5261 


5274 






5420 


54494 




MOT sue 


025126 


5015 


5024 


S05S 






51494 






MOIVO 


021244 


43614 






MorvF 


020056 


41334 






MFA 


003206 


10544 






MFACU 


003200 


10404 






MFSRCM 


012566 


28574 






MLCO 


032464 


63674 






MLCr 


031626 


62014 






MLOC 


017120 


39154 






ML0C2 


031506 


61594 






MLD0M2 


012656 


28914 






ML00M3 


012764 


29284 






MLCX)m 


013124 


29724 






ML00M5 


013250 


30124 






MLD0M6 


013360 


30484 






MLD0M7 


013460 


50784 






ML0M27 


013566 


31144 






MLOSUB 


024074 


4807 


4818 


4629 


MLFSUB 


023042 


4586 


4596 


4604 






4694 


4705 


47254 


MLSl 


030356 


58664 






MLS2 


030474 


59074 






MLS3 


030612 


59484 






MLS4 


030746 


59914 






MLS5 


031066 


60324 






MLS6 


031222 


60754 






MLS7 


031346 


61164 






MLXP 


033106 


651 74» 






MMOOO 


025436 


52404 






MMOOT 


024336 


50074 






MMIJLD 


023304 


47994 







USER STMBU S 



SEQ 0152 



9604 



5287 
5042 



5500 
50S1 



551 S 
5061 



5526 
5070 



5559 
5079 



55S. 
S066 



5565 
5097 



5579 
5106 



5592 
5115 



5406 
5124 



4640 
4612 



4651 
46^0 



4 '362 
4626 



4675 
4656 



4>64 
4644 



4896 
4652 



4907 
AS60 



49554 



4676 



468'; 



uLOBAl 


APE AS 


MAC>ll 


30M( 1052 ) 


KOJllA.MAC 


1 <^ MAQ Ad 




MMi 1 r 






4560« 


MMI ITQT > 






1# 








2980 




ni ^1 r\A 




3454« 








3152» 








3238* 








3291 • 








334 !• 








36790 




A A A A A A 


u 


5240 






u 


5007 








5154 


M^R 


ni "iTpn 




3629« 


Mcf*n 






6819* 


M^rp 






7048* 


M<;nr 


wC r 




5639* 




1 77 7AA 




453« 


M^rn 


OP71 




55370 








57830 








7207 


' • jOc 


V-JQ^ JO 




7217 


MSXP 






70890 


Mil n ■ 


A 4^ ^ 4 4 A 


u 


4799 




^ A A A 4 A 


u 


4580 


Ml lUAD 


ni API p 




37190 




wX"»O0*t 




33800 




wvwx 




10 


NGQP • 




u 


3454 


NNRMl > 




u 


3152 


1 W ■ *1 It 




u 


3238 


NNRflS • 




u 


3291 


NNRM4 > 




u 


3341 


NPM 


4 4 4444 


u 


3679 


PARR AM X 


w\/W\/X 




10 


PIRQ ' 


1 7777? 




1990 


PIROVE ' 






2930 


PPO ' 






2160 


PRl * 






2170 


PR2 ' 


OOOl OO 

VW X w 




2180 


PR3 « 


OOOl AO 




2190 


PR4 « 


OOOPOO 




2200 


PR5 « 


OOOPAO 




2210 


PR6 ■ 


OOO 




2220 


PR7 « 


OOO'VdO 




2230 


PS « 


X ' ' ' »D 




I960 


PSU • 


1 7777A 




1970 




OOOOPA 




2880 


QBUSEX* 


000001 




10 


RBUT « 






4600 


PCSR 






4590 


PECOAT 






5800 


PECOS T 


OOl IPA 




6000 








3297 








3762 








4976 


PECFEC 


001106 




5980 



CROSS RE.rERENCE TARI t 



166 



509 



595 



752 



USER SYMBOLS 
756 761 



SEQ 0155 



76r' 



8 4 



877 



7233 



7497 



52360 54L.4 



72330 
72410 



197 
602 



2897 
3351 
3795 
5194 
2865 



2934 
3389 
3825 
5494 
5772 



2962 
3466 
3658 
5603 
6807 



2978 
3494 

3888 
5715 
7036 



50 1** f054 

SLi 3565 

^928 3958 

t>8l' 61 J8 



5CA4 5120 

5587 3609 

3996 4020 

6347 6476 



5159» 
3638 
4108 
6741 



3160* 
5693 
4350 
6972 



5172 5044 

5"0« 3750 

4549 4 7t>9 

7154 'l-'4 



U-OBAl areas HACtll 30A(1052) 15 MAR 84 16:58 PAGE 155 
KOJllA.MAC IS MAR -64 15:51 CROSS REFERENCE TABLE 



RECST 001116 



RESTAR 

RESVEC- 

SAVSPl 

SAVSP2 

SB 

SCO 

scosue 

SCF 
SOT 

sofsue 

SOPARO- 
SOPARl- 
S0PAR2" 
SDPAR3> 
S0PAR4' 
SOPARS- 
SDPAR6- 
S0PAR7" 
SDPORO« 
SOPORl- 
S0P0R2« 
S0P0R3- 
S0P0R4- 
S0POR5» 
SDPDR6' 
SOPOR 7- 
SFO 

SFOI • 

SFOSUe 

SHMOO . 

SIPARO' 

SIPARl* 

SIPAR2. 

SIPAR3- 

SIPAR4- 

SIPAR5» 

SIPAR6- 

SIPAR7- 

SIPDRO- 

SIPORl" 

SIP0R2' 

SIP0R3' 

SrP0R4« 

SIP0R5- 

SIP0R6- 

SIP0R7= 

SKIPIO 

SLOCOO 

SLOCOl 

SRO 

SRI 

SR2 

SR3 



002410 

000010 

001062 

001064 

****** u 

****** \i 

0S5SS6 

****** (J 
****** u 

027712 

172260 

172262 

172264 

172266 

172270 

172272 

172274 

172276 

172220 

172222 

172224 

172226 

172230 

172232 

172254 

172236 

****** U 

****** u 

027336 

OOOOOl 

172240 

172242 

172244 

172246 

172250 

172252 

172254 

172256 

172200 

172202 

172204 

172206 

172210 

172212 

172214 

172216 

036306 

001030 

001032 

177572 

177574 

177576 

172516 



599« 
6058 
874« 
283« 
591« 
592« 
3629 
6819 
6827 
6931 
7048 
5639 
5647 
?'.86# 

k>W ■ V 

388« 
389« 
390« 
S91« 
392« 
393* 
364« 
365* 
366« 
367* 
368« 
369« 
370# 
371* 
5537 
5783 
5544 
!• 
375# 
376* 
377* 
378* 
379* 
380* 
381* 
382* 
353* 
354* 
355* 
356* 
357* 
358* 
359* 
360* 
7206 
575* 
576* 
302* 
303* 
304* 
305* 



5874 

7230 

7627* 
7628* 



6835 
6939 



565^ 



5884 



5890 



5915 



L 1, 

USER SYMBOLS 
5925 5931 



5958 



5974 



SEQ 0154 
5999 6009 6015 6042 



6843 
6947 



5663 



6851 6859 
6970* 7056 



5671 



5679 



6867 
7064 



5687 



6875 
7072 



5710* 



6883 
7080 



6891 



6899 6907 6915 6923 



5552 
536 



5S60 
7233 



5566 



5576 



S596* 



7206* 



oLOBal 


ARtAS MACUl 


50A( 1052 ) 


15 MAR 


-84 1 


KDJIIA.MAC lS-nAR-84 


15:51 




CROSS 


STACK • 


001000 


187« 


834 




START 


002200 


492 


498 


831« 


STBOT - 


001000 


470« 






STKLMT- 


177774 


198« 






SUBT 


003524 


1064 


1067 


1069 


SUR 


001046 


584 « 


847* 


849 


SURFG 


000176 


496« 


855 




SUO 


000001 


25 !♦ 






SUOO - 


000001 


241* 


251 




SUOl - 


000002 


240« 


250 




SU02 • 


000004 


239« 


249 




SU03 • 


000010 


238« 


248 




SW04 • 


000020 


237« 


247 




SU05 - 


000040 


236« 


246 




SW06 • 


000100 


235* 


245 




SU07 - 


000200 


234* 


244 




SU08 > 


000400 


233* 


243 




SU09 • 


001000 


232* 


242 




SUl 


000002 


250* 






SUlO - 


002000 


231« 






SUll - 


004000 


230* 






SU12 - 


010000 


229« 






SUIS - 


020000 


228* 






SU14 > 


040000 


227* 






SUIS « 


100000 


226* 






SU2 


000004 


249* 






SU3 


000010 


248* 






SiM 


000020 


247* 






SU5 


000040 


246* 






SU6 


000100 


245* 






SU7 


000200 


244* 






SU8 


000400 


243* 






SU9 ■ 


001000 


242* 






SXP 


****** u 


7069 






SXPSUB 


036154 


7096 


7103 


7110 


TABl 


001176 


610* 


2896 


2910 


TABIO 


001326 


652* 


3390 


3429 


TABll 


001336 


656* 


3386 




TABllA 


001346 


660* 


3401 




TAB 12 


001356 


662* 


3409 




TAB 13 


001366 


664* 






TAB13B 


001376 


668* 


3412 




TAB14 


001406 


670* 


3422 


3657 


TAB 15 


001416 


674* 


3423 




TAB16 


001426 


676* 


3437 


3946 


TA817 


001436 


682* 


3442 




TAB18 


001446 


685* 


3330 




TAB2 


001206 


614* 


2936 


2961 


TAB21 


001456 


669* 


3462 


3463 


TAB22 


001466 


691* 


3474 




TAB2S 


001476 


693* 


3464 


3519 


TAB24 


001506 


695* 


3510 


3548 


TA825 


001516 


697* 


35S6 


3582 


TAB26 


001526 


699* 


3557 


3563 


TA827 


001536 


701* 


3573 


3595 


TAB2e 


001546 


70S* 


3605 





1071 
855* 



1073 
869* 



USER SYMBOLS 



1127* 



SEQ 0155 



7117 
2916 



7124 

3020 



7131 
3036 



7152* 
3066 



3104 



3<;<M 



3055 
3520 



3246 

3657 



Ni, 



(jLOdAL 


ARE. AS nHLTll 




1 C MAD 


84 1.C 


KOJllA. 


MAC IS MAR 84 


15:51 




CROSS I 


TAB29 


0015S6 


705# 


S604 




TAB29A 


001S66 


707* 


3617 




TABS 


001216 


616« 


2979 


2996 


TABSO 


001S76 


710* 


3688 




TABSl 


001606 


712« 


3687 




TAB32 


001616 


714« 


3703 




TAB33 


001626 


716# 


3704 




TAB34 


001636 


718» 


3695 




TAB4 


001226 


622« 


3261 


3280 


TAB40 


001646 


720# 


3727 


3728 


TA841 


0016S6 


722* 


3791 


3816 


TAB42 


001666 


724« 


3854 


3879 


rAB43 


001676 


726# 


3904 




TAB45 


001706 


728# 


3924 


3930 


TAB46 


001716 


730« 


3936 




TA647 


001726 


732« 


3991 


5815 


TAB47A 


001736 


734* 






TAB48 


001746 


7360 


4004 


4016 


TAB49 


001756 


738* 


3966 




TABS 


001236 


626* 


3121 




TA65A 


001246 


630* 


3841 




TAB6 


0012S6 


6340 


2980 


3156 






4028 


4118 


S622 


TAB6A 


001266 


638« 


6187 




TAB7 


001276 


642* 


3349 


3790 


TABS 


001306 


646* 


3350 


3363 


TA69 


001316 


650* 


3355 




TAGRAM« 


000001 


1* 


874 




TBITVE« 


000014 


284* 






TIMEOU 


004424 


1272 


1333* 




TKVEC ' 


000060 


291* 






TPVEC - 


000064 


292* 






TRAPVE' 


000034 


290* 


836* 


6S9* 


TRPFLG 


002122 


792* 


1156* 


1166* 






1778» 


1646* 


1906* 






2689* 


2776* 




TRTVEC- 


000014 


265* 






TS031 


011662 


2643* 


2654 




TSFPl 


003650 


1152* 






TSFPIO 


005214 


1527* 






TSFPll 


005450 


1598* 






TSrP12 


005560 


1638* 






TSFP13 


005634 


1665* 






TSFP14 


006004 


1717* 






TSFP15 


006160 


1770* 






TSFP16 


006400 


1838* 






TSFP17 


006572 


1896* 






TSFP2 


003742 


1182* 






TSFP20 


007006 


1965* 






TSFP21 


007206 


2026* 






TSFP22 


007430 


2093* 






TSFP23 


007616 


2148* 






TSFP24 


007754 


2193* 






TSFP25 


010156 


2254* 






TSFP26 


010320 


2302* 






TSFP27 


010720 


2417* 







l58 PAGE 157 
■FERENCE TABLE 



3002 



USER SYMBOLS 



SEQ 0156 



3751 
3853 



3947 



3752 
3878 



3951 



3992 



3245 



3815 
3364 



3298 



3649 



3666 



3740 



3776 



3803 



3866 



3925 



4015 



1221* 
1971* 



1267* 
2032* 



1354* 
2099* 



1394* 
21S4* 



1462* 
2199* 



1533* 
2260* 



1604* 
2306* 



1644* 
2423* 



1673* 
2531* 



1725* 
2636* 







50MC lOb^ ) 


t C Mj 

lr» Hi 


KOJllA. 


MAC 15 MAR 64 


15:51 




TS' ''■5 




4 ^ 1 K A 




I Jjr K30 








TCCD V 1 
I ST Kol 




:)A. 

^3£V 






011774 


'SA.A V A 






012^70 


^9 7AA 

iffQw 




1 J»r r9 


AAA « X. A 

004164 


4 ^A ■ A 






AAA A A A 

U04444 


1340# 




T CCD^ 


AAA CKA 






1 or K 1 


AA^ 

W04 /OO 


f Ag^ A 






AAKA • A 




13 • »• 


Tec t S 


AAC T 7 A 

0057 74 


4 A. 

lb 72 


1 7 AAA 




AA^ « CA 


1 '24 


1 7& 1 A 


TCC % K. 


AAX V 7 A 

0063 f 0 


1777 


1 A^AA 

152W 


T CC 1 £ 


AAXKX ^ 

OOd5o^ 


4 AAC 

1045 


« AAOA 

lOOW 


T CC 1 


OOo » 


% OAC 


l»bo» 




AAA A 4 A 

004014 


4 4 OA 
IIW 


119<; 


TCC 


OO f I 


X*f r 3 


CVl '* 


TCC ^ 1 


AA YA "^A 

00742O 


^A VA 

e034 


20ob# 


T CC O 5 


OO 'dOO 


Ol A1 

clOl 


^1 VAA 


T CC ^ » 


AA YA a 

00/744 




21B39 


T CC 


A « A « A A. 

01014O 


^9A4 

ccOl 




T CC S 1 


AVI A 

01l7o4 


'^A.A A 

2o40 


^A7AA 

2o7## 


T cc^ 


AAA 

004 ryo 


13W 


f AAftA 

l#*Bw 


T CC T 


AAV t CA 


4 A AX. 

1400 






AA f 1 VA. 

OOI 13o 


A. AAA 


t A 1 7 

l*17 






4 A.MA 


loB3 






4 MO 

1653 








^AA ^ 


cO*3 






30A0a 


cell 






"^AX^ 

24oo 


c#o^ 






^A.A7 A. 








tf?34» 








5^13 


b"fl"» 






A^ VO A 


£.AAA* 






A. 4 ^ V A 

6129* 


A. 1 ^A A 

ol2#» 


TCTI 

■ b 1 1 


00^42^ 


AAS A 




TCTin 
■ b 1 lU 


AAA CCA 

0043D4 


1592# 




1 b 1 lUU 


0510DO 


AV^ A 




TCTl At 
1 b 1 lOl 


ASt 


6079# 




TCTI 


03134t» 






■ b 1 IV J 


A« « 


f 4 A y A 




TCTlAA 


0510A 


A '>AE A 




TCTI/V^ 

1 b 1 xtr> 


ilS^AiCA 

O324o4 


o391# 




TCT 1 


A*« t Ag 


aC%« a 




TCTi AT 
1 b 1 Xv ' 


AXAC 

03453^ 


662 3# 




TCTI 1 

• bill 


AAA T£A 

004760 


« A A A A 




TCTI 1 O 

1 b 1 iiu 


A»e^ "fc^ 
05DOCC 


7052 • 




TCTI t 1 
I 3 I 111 


7 f O 






TCT 1 3 

1 b I kc 


AAC^I A 


l331# 




TCTI * 

1 b 1 13 


AACACA 

OOj4MJ 


1602* 




TCT 1 A 

1 bi 1# 


A^yCCX A 

OOj->oO 


4 A A ^ A 




TCT » ^ 

1 b 1 kj 


AACX -gA 

UO->o34 


16o9# 




TCTKv 
1 b 1 lo 


AA^ AAA 

UUDUU4 


I '21» 




T CT f 7 

I bi 1 / 


AAg « ^ A 

OOoloO 


1 /74» 




TCT3 

1 b 1 e 


aasoaa 
OOOfOO 


« /VA A A 






/\A^AAA 







1-04 16:50 PAGE 158 

CROSS RErERFNCE TABl E USER SYMBOLS 



11^ 


1196 


1201* 






1419 


1472 


1475 


1464 


14S6 


1729 


1752 


1755 


1741 


17S2 


1910 


1915* 


1914 


1917 


1925 


2051 


2060 


2105 


2108* 


2109* 


2220 


2264 


22€/ 


2270 


2276 


2475 


2555 


2559 


2542 


2556 


270a» 


2710 


2719* 


2721 


2760 


29S6* 


2957 


2949 


2955 


5019 


5954 


5955* 


5956* 


5957 


5958* 


6041 


6042* 


6046 


6052 


6081 


6125 


6126* 


6150 


6156 


6142 



SEQ 0157 



1545 


1546 


1555 


1559 


1611 


1677 


1785* 


1786 


1789 


1795 


1796 


1850 


1977 


1980 


1983 


1989 


2058 


2041« 


2111 


2160 


2165* 


2166 


2205 


2208* 


2427 


2451 


2454 


2448 


2451 


2457 


2559 


2565 


2574 


2577 


2583 


2693 


2784* 


2786 


2795* 


2797 


2806* 


280S 


5020* 


5052 


3086* 


5089 


5872 


5878 


5962 


5968 


5997 


5998* 


6003 


6038 


6082* 


6085 


6087 


6093 


6099 


6122 





006572 
007006 


19029 






1969» 




TST25 


007206 


20S0« 




TST24 


007430 


2097# 




TST25 


007616 


2152« 




TST26 
TST27 


007754 


2197# 




010156 


225«# 




TST3 


003650 


1156# 




TST30 


010320 


2306« 




TST51 


010720 


2421« 




TST32 


011264 


2529# 




TST33 


011632 


26S6« 




TST54 


011774 


268 7# 




TST35 


012270 


2774* 




TST36 


012566 


2861* 




TST37 


012656 


2e95» 




TST4 


003742 


1186# 




TST40 


012764 


2932# 




TST41 


013124 


2976» 




TST42 


0132S0 


3016« 




TST43 


013360 


3052» 




TST44 


013460 


3082* 




TST45 


013566 


3118* 




TST46 


013700 


3156« 




TST47 


014164 


3242* 




TST5 


004044 


1219* 




TST50 


014342 


3295« 




TST51 


014510 


3345« 




TST52 


014634 


33849 




TST53 


015104 


3458» 




TST54 


015720 


3633^ 




TST55 


016066 


3683« 




TST56 


016212 


3723* 




TST57 


017120 


3919* 




TST6 


004164 


1265# 




TST60 


017542 


4043* 




TST61 


020056 


4137# 




TST62 


021244 


4385» 




TSTfe3 


022242 


4584* 




TST64 


023304 


4803# 




TST65 


024336 


5011* 




TST66 


025436 


5244* 




TST67 


027136 


5541# 




Tsr? 


004444 


13529 




TST70 


027456 


56439 




TST71 


030144 


57879 




TST72 


030214 


58139 




TST73 


030306 


58449 




TST74 


030356 


58709 




TST75 


030474 


59119 




TST76 


030612 


59529 




TST77 


030746 


5995» 




TSlOOl 


005420 


1538 


1550 


TS1002 


005430 


1540 


1547 


TS1004 


005440 


1558 


15929 


'SllOl 


005550 


1607 


16329 



15849 
15889 



U-OBAt. ARMS MrtC>ll 50A(lOScM IS 
KOJllA.nAC 15 MAR 84 15:51 
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CROSS REFERENCE TABl E 



USER SYMBOLS 



SEQ 0159 



TS^600 010640 2311 

TS2601 010650 2S22 

TS260a 010660 ^333 

TS2603 010670 2320 

TS26D4 010700 2331 

TS2605 010710 2342 

TS2700 011204 2426 

TS27D1 011214 2S0S« 

TS27D2 011224 2507# 

TS^70S 011234 2440 2511« 

TS2704 011244 2456 2515* 

TS2705 011254 2476 2S19« 

TS3000 011552 2536 2606# 

TS3001 011562 2610« 

TS3002 011572 2614* 

TS3003 011602 2546 2616* 

TS3004 011612 2566 2622* 

TSS005 011622 2564 2626* 

TS3200 012210 2694 2744* 

TS3201 012220 2748* 

TSS203 012240 2700 2756* 

TSS204 012250 2711 2760# 

TS320S 012260 2722 2764« 

TS3SD0 012506 2781 2851* 

TS330I 012516 28354 

TSS302 012526 2859* 

TS3303 012536 2787 2843# 

TS3304 012546 2798 2847* 

TSS305 012556 2809 2851* 

TS60A 004730 1408 1425 

TS60AT 004740 1400 1402 

TS7DA1 005164 1467 1479 

TS70A2 005174 1469 1476 

TS7DA4 005204 1487 1521# 

TrPOS • 104405 7219 75574 

TYPE » 104401 7207 7217 

TyPOC ' 104402 75544 7659 

TyPON » 104404 75564 

TYPOS « 104403 75-j4 
UOPARO* 177660 3424 
UOPARl- 177662 343# 
U0PAR2. 177664 3444 
UDPAR3- 177666 3454 
J0PAR4- 177670 3464 
U0PAR5- 177672 3474 
U0PAR6' 177674 3484 
UDPAR7. 177676 3494 
UDPDRO- 177620 3204 
UOPORl' 177622 3214 
U0P0«2» 177624 3224 
U0P0R3' 177626 3234 
U0P0R4- 177630 3244 
U0P0R5 177632 3254 
iJOPOne* 177634 5264 
•J0P0R7- 177636 3274 
JIPARO' 177640 3314 



2319 


2546 


2554 


2530 


2557 


2565 


2341 


2568 


25994 


2355 


24034 




2566 


24074 




24114 






24994 







25914 
25954 



14594 
14454 

15134 
15174 



7220 
7642 



7289 



7411 



7480 



75534 76S4 



7657 



7640 



1^9??'. ^^i**^ .-'^ASiU 30A11052) 15 MAR 84 16 :5a PAGE 161 
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LI ) 
USER SrMBOLS 



SEQ O160 



UIPARI 

0IPAR3 

UIPAR4 

UIPAR5 

UIPAR6 

UIPAR7 

UIPORO 

UIPORl 

UIP0R2 

UIP3R3 

UIP0R4 

UIP0R5 

UIPOR«> 

UIP0R7 

UVAO 

ULDTRP 

XBUF 

XCSR 

XOFl 

»APTMO 

$ASTAT 

$ATYC 

lATYl 

»ATY3 

$ATY4 

JCMARC 

)CKSUR' 

JCMTAG^ 

SCPUOP 

»CRLF 

$DBLK 

JOEVCT 

$OOAGN 

JDTBL 

SENOAO 

$ENOCT 

»ENULL 

$ENV 

JENVM 

JEOP 

»EOPCT 

$ERFLG 

S ERROR 

SETASL 

»ETENO 

JFATAL 

SPILLC 

»riLLS 

$GET42 

tGTSUR< 

$K) 

»MIBTS 

$Lr 

SLFLG 



1"'7642 


332* 






177644 


333* 






I77«i46 


S34« 






I77i50 


335* 






177652 


336* 






177654 


337* 






177656 


333* 






177600 


309# 






177602 


310« 






177604 


311« 






177606 


S12« 






177610 


SIS* 






177612 


314* 

315* 






177614 






177616 


316* 






**«*«* (.1 


3719 






002106 


783* 


3789 


3852 


177566 


462* 






177564 


461* 






****** u 


3380 






000204 


518 


524* 




****** u 


7594 


7609 




037624 


7565 


7567* 




037600 


7563* 






037606 


7274 


7564* 




037616 


7566* 


7645 




037032 


7291* 


7301* 


7308 


****** 0 


7560 






****** 0 


834 


840 


842 


001026 


562* 






002077 


766* 


7290 


7551 


037272 


7377 


7411 


7419* 


001010 


553* 






036372 


7213 


7222 


7226* 


037262 


7380 


7415* 




036362 


505 


7224* 




036330 


841 


7215* 




036376 


7220 


7231* 




001020 


558* 


7269 


7572 


001021 


559* 


867 


7271 


036274 


7204* 






036322 


841* 


7212* 


7216 


001052 


586* 


842* 


7621* 


040046 


836 


871 


7621* 


001020 


557* 






001030 


530 


569* 




001002 


550* 


7600* 




040044 


7563* 


7566* 


7594 


037050 


7294 


7348* 




03704 7 


7347* 






036352 


7221* 






****** u 


7559 






OOOOOo 


175 


176 




000204 


525* 






037053 


7351* 






040043 


7604* 


7610* 





7534* 7559* 



7596 
7276 



7622 



7645 
7574 



7605* 7611* 



L > 



liLOBAu 


ARf As 


MAC < 1 1 


30AI I05t? ) 


IS MAR 84 16; 


; 58 PAGC 


162 
















SEQ 0161 


KOJllA. 


MrtC 


15 MAR 84 


15:51 




CROSS REFERENCE 


TABLE 


USER SYMBOLS 














JMrtlL 


OOlOOO 




526 


550 


548^ 


859 


7269 


















$M6A0R 


^^^^ 
000206 




526 ♦ 


























$MFLG 


040042 




7564* 


7570 


7605* 


76094 




















*MSGAO 


001014 




5550 


7580* 


7583 






















JMSGLG 


001016 




5560 


758L.- 
























*MSGT> 


001000 




549# 


7578 


7586* 


7598 


7602* 


















*NULL 


OS 7046 




7296 


73464 
























JNUTST » 


000001 




864# 


886 


10414 


1043 


11534 


11854 


12164 


12624 


13494 


13894 


14574 


15284 


15994 








1639* 


16664 


17184 


17714 


18394 


18994 


19664 


20274 


20944 


21494 


21944 


22554 


23034 








2418# 


25264 


26334 


26844 


27714 


28584 


28924 


29294 


29734 


30154 


30494 


50794 


31154 








3153# 


32394 


32924 


33424 


33814 


34554 


36304 


56804 


37204 


39164 


40404 


41344 


43824 








45814 


48004 


50084 


52414 


55364 


56404 


57844 


58104 


58414 


586 74 


59084 


59494 


59924 








60334 


60764 


61174 


61604 


62024 


63884 


65184 


68204 


70494 


70904 






»OCNT 


037524 




7452* 


7481* 


74944 






















tOMOOE 


037526 




744 7 • 


7451 • 


7456 


7459* 


74 70* 


74964 
















tPASS 


001006 




5524 


840* 


866* 


7205 


7209* 


7210* 


7218 


7251 












»PH5Tn 


000212 




5284 


























IPATCH 


040214 


G 


76514 


























SQUES 


037052 




73504 


























$rocmr» 


*••••* 


U 


7560 


























*ROOEC« 




U 


7560 






























U 


7560 


























SROOCT • 


•***•* 


U 


7560 


























tRTNAO 


036374 




72304 


























$R2A • 


*••*•* 


U 


7560 


























* SAVRE » 




U 


7560 


























» SETUP" 


000126 




4714 


835 


836 


858 


840 


842 


845 


7209 












tSTUP • 


177777 




4714 


























•5VPC ■ 


000204 




5034 


508 
























« Cud * 


160000 




175 


1764 


845 


895 


• AC A 

1050 


1158 


1188 


1221 


1267 


1554 


1594 


1462 


1533 








1604 


1644 


1671 


1725 


1776 


1844 


1904 


1971 


2052 


2099 


2154 


2199 


2260 








2308 


2423 


2551 


2658 


2689 


2776 


2863 


2897 


2954 


2978 


5018 


5054 


3084 








S120 


3158 


5244 


5297 




5586 


5460 


5655 


5685 


5725 


3921 


4045 


4139 








4587 


4586 


4805 


5015 


5246 


5545 


5645 


5789 


5815 


5846 


5872 


5913 


5954 








5997 


6038 


6081 


6122 


6165 


6207 


6595 


6525 


6825 


7054 


7095 


7201 


7209 








7223 


7229 


7251 






















•bWRtG 


001022 




5604 


869 
























t TCC Tbi 


AAA 

001004 




5514 


874* 


894* 


1049* 


1157* 


1187* 


1220* 


1266* 


1555* 


1595* 


1461* 


1552* 


1603* 








1643* 


1670* 


1722* 


1775* 


1845* 


1905* 


1970* 


2051* 


2098* 


2155* 


2198* 


2259* 


230 7« 








2422* 


2550* 


2657* 


2688* 


2775* 


2862* 


2896* 


2955* 


2977* 


5017* 


5053* 


5085* 


3119* 








3157* 


3243* 


5296* 


5546* 


* VAC A 

3585* 


5459* 


S6S4* 


5684* 


5724* 


5920* 


4044* 


4158* 


4586* 








4585* 


4804* 


5012* 


5245* 


5542* 


5644* 


5788* 


5814* 


5845* 


5871* 


5912* 


5955* 


5996* 


» 1 Kd 






6057* 


6060* 


6121* 


6164* 


6206* 


6592* 


6522* 


6824* 


7055* 


7094* 








037040 




7315 


7322 


75454 






















C Tl^C 


037036 




7313 


7520 


75424 






















C — 
• 1 r| ■ 


AAA 4 

OOOlli? 




1754 


884 


8954 


1041 


10504 


1155 


11584 


1185 


11884 


1216 


12214 


1262 


12674 








1549 


13544 


1589 


15944 


1457 


14624 


1528 


15554 


1599 


16044 


165* 


1644* 


1666 








16714 


1718 


17254 


1771 


17764 


18S9 


18444 


a AAA 

1899 


19044 


1966 


19714 


202"* 


20324 








2094 


20994 


2149 


21544 


2194 


21994 


2255 


^2604 


2505 


25084 


2418 


24254 


2526 








25314 


2633 


26584 


2684 


26894 


2771 


27764 


2858 


28654 


2892 


28974 


2929 


29344 








2973 


29784 


5015 


30184 


5049 


50544 


3079 


50844 


5115 


51204 


5155 


31584 


5239 








32444 


3292 


52974 


5542 


55474 


5581 


55864 


5455 


54604 


5650 


56554 


3680 


5685* 








3720 


37254 


3916 


39214 


4040 


40454 


4154 


41594 


4582 


45874 


4581 


45864 


4800 








48054 


5008 


50134 


5241 


52464 


5558 


55454 


5640 


56454 


5784 


57894 


5810 


5811* 








5841 


58464 


5867 


58724 


5908 


59154 


5949 


59544 


5992 


59974 


6055 


6038* 


6076 










6117 


61224 


6160 


61D3V 


6202 


62074 


6oOo 




DSlO 


Va 

03e54 


^fl ^A 


<>Oc;r>* 



KOJllA. 



AR( AS 
MAC 



MAC > 1 1 iOAv lOb.^ ) 
15 MAR 64 15:51 



IS MAR 84 



1 E 



USER SVMBOl S 









7049 


f 054^ 






% TPB 


05 7044 




/331 • 


f 3*4Dw 






JTPFLG 


037051 




7^63 








$ ''PS 


037042 




7329 
030 


f 344 w 






» TKftP 












$ TRAP2 


03 7552 




f 510w 








S TRP • 


000006 




7545* 




' J J Jw 




t TRPAD 


037564 




7510 


f 55cV 






$ TSTM 


000210 




52 








»TSTNU« 


000001 




464 # 








» T>P8N» 




U 


T C t O 

7538 








$TtPDS 


037056 




' d65# 


7^^7 
f 55 7 






$ T>PE 


036502 




7263» 






»TyPEC 


036714 






f 300 






$ TtPEX 


037034 






7XX7 






» T T POC 


0373^ 












t TiPON 


03 75md 




f 


74^0il 






* T w one 

STtPOS 


037302 












JUNIT 


ooioi< 




g g * m 








JUNITM 


0OO214 












tUSUR 


001024 




561w 








IXOr^'^ » 


000023 




' 31 ' 








tXON • 


000021 




7 * 


/344 






$ *'»ET4« 


000000 




72234 








$ OF ILL 


037525 




7446* 


745U* 




f 40CAT 


oooooo 




A AAA 










040234 




A 7^ A 


AAA 














J J t w 


596# 


597* 








7344 


7345 


7346 


7347 


. lASTA- 




u 


7564 


7567 






.$X 


000204 




514« 


519 


551 


536 



75570 75^8» 



504* 
598# 
7340 



506* 
599# 
7549 



50«# 514 5154 517# 519# 
600« 609* 766* 7251 7252« 
7550 7551 7552« 74194 76124 



531* 5334 
7542 7543 
76524 



OBAi ARl As MAC 111 50A( 105^) 15 MAR 84 16:58 PAGE 165 



KOJllA, 


.MAC 15 


•MAR 84 


15:51 




CROSS 


REFERENCE 


TABLE 


BGNMOO 


160« 


876 












BGNSL>B 


161* 














BGNTST 


160* 


893 


1048 


1156 


1186 


1219 


1265 




1774 


1642 


1902 


1969 


2030 


2097 


2152 




2861 


2895 


2932 


2976 


3016 


3052 


3082 




3683 


3723 


3919 


4043 


4137 


4365 


4584 




5870 


5911 


5952 


5995 


6036 


6079 


6120 


CKLOOP 


160# 














COMMEN 
















OErPRG 


19 














ENOCOM 


294« 














ENOnOO 


160* 


7194 












ENOPAS 


7195« 


7217 












ENOSUB 


161* 














ENDTST 


160« 


1038 


1150 


1167 


1197 


1256 


1300 




1825 


1665 


1952 


2013 


2061 


2135 


2181 




2869 


2926 


2971 


3011 


3047 


3077 


3113 




3718 


3913 


4037 


4131 


4293 


4491 


4711 




5905 


5946 


5969 


6030 


6073 


6114 


6157 


ERROEF 


159« 














ERROF 


160« 


765 


941 


956 


965 


974 


983 




1175 


1206 


1226 


1236 


1246 


1254 


1284 




1404 


1412 


1421 


1429 


1448 


1499 


1506 




1699 


1706 


1757 


1745 


1752 


1761 


1791 




1680 


1669 


1919 


1925 


1932 


1940 


1947 




2062 


2069 


2076 


2085 


2115 


212S 


2150 




2245 


2273 


2281 


2269 


2296 


2S16 


2527 




2463 


2472 


2481 


2493 


2545 


255S 


2562 




2705 


2716 


2727 


2738 


2792 


2805 


2814 




2951 


2957 


2966 


2992 


2998 


5006 


5028 




3139 


3146 


3166 


3177 


3189 


5196 


5205 




3315 


3326 


3334 


3359 


SS73 


5597 


5405 




3514 


3527 


3536 


3543 


3552 


5569 


5577 




3699 


3713 


3736 


3744 


3757 


5766 


5775 




3670 


3663 


3694 


3900 


S906 


5952 


5940 




4112 


4124 


4323 


4332 


4341 


4554 


4565 




4750 


4759 


4772 


4781 


4793 


4949 


4958 




5208 


5219 


5230 


5467 


5476 


5485 


5499 




5744 


5755 


5764 


5776 


5796 


5802 


5626 






5933 


5941 


5964 


5970 


5976 


5964 




6069 


6095 


6101 


6109 


61S2 


6158 


6144 




6500 


6509 


6758 


6767 


6776 


6790 


6799 




7176 


7165 












ERROR 


166* 


785 


942 


9S6 


965 


974 


965 




1175 


1206 


1228 


1236 


1246 


1254 


1284 




1404 


1412 


1421 


1429 


1449 


1499 


1507 




1699 


1709 


1737 


1745 


1752 


1762 


1791 




1880 


1690 


1919 


1925 


1932 


1940 


1947 




2062 


2069 


2076 


2086 


2115 


2125 


2150 




2246 


2273 


2281 


2289 


2296 


2516 


2527 




2463 


2472 


2481 


2493 


2545 


2555 


2562 




2705 


2716 


2727 


2738 


2792 


2805 


2814 




2951 


2957 


2966 


2992 


2998 


5006 


5028 




3139 


3146 


3168 


3177 


3189 


3196 


5205 




3315 


3326 


3334 


3359 


3373 


3397 


5405 




3514 


3527 


3536 


3543 


3552 


3569 


5577 

















SEQ 014 


MACRO 


NAMES 














1 XQ? 






lOUc 


1 ^Jk o 




1 721 




cc^O 




c^c 4 


cOC7 


COJD 


CDO / 


^7 Til 

£ / 


OHO 


XI 




X3Q^ 


3.3*D 






3655 


••OS/ J 






J J* I 


jO*3 




QA1 V 

DO 13 


9844 


616S 


6205 


6391 


6521 


6825 


7052 


7095 






1 AX^ 

4*t03 


1 AO? 


4309 




LoOc 


1 7fVM 
I 


1 /5 / 




994Q 


CO f o 


C*0* 




9J^7A 


C ' 3U 


OA 1 7 






X9AO 


XXXQ 

9997 




XA43 

9*9e 




567 7 




9V90 


4AXX 

9*99 


990* 




4AA7 


CAT A 


900* 


6199 


6528 


6457 


6724 


6954 


7067 


7138 






1 AAX 


1 n7Q 

4V f y 


1 AA7 
4VO ' 


1 AO^ 


1 1 AX 

44UO 


1 1 1 o 


1 1 o 1 
llcl 




1 XI A 


49eO 


1 XXX 

4999 


49*U 


490* 


1 V71 

19 r 1 


1 5O0 




1^77 


1 A1<> 
4040 


1<19X 
40e9 


1iL49 
409e 


1 A4A 


1 

1003 


1 

lt>7^ 




1 AA*> 
40V9 


1 A1 X 

4049 


1 ASA 


1 A9Q 

10C7 


1 A4A 


loOD 


1 A7 V 




1 <M4 
4709 


10QX 

4 ▼▼9 


9AA1 
CW4 


9AAA 
eUVO 


9A1 7 
CUI ' 


OAAA 

cu*o 


3A^C 


91 XQ 


91 AO 

c407 


91 741 
c 4 >0 


91 A4 


cc4o 


939X 


9D^a 
CCC7 


cc5o 


9XXA 


9X<(1 
C994 


9Xil9 


9X79 
C9rc 


9XAA 
C90* 


9AX7 
e*9 / 


9AA^ 
«**9 


C* J* 


C3 ' 1 


9^IIA 
C90V 


94AO 




cD9V 


9iL47 
Cf>9 ' 


9&AA 
COO* 


CO f * 




9A71 
CO ' 4 


9A7A 
CO >o 


9AAA 


90AA 


9Q1 9 
C74c 


900D 
C7C£ 


C7*D 




9V*C 


XAikX 


XA79 
9W 'C 


XAQA 

9W7* 


XI AA 
94UV 


VI AA 


9491 


X91 \ 


X99A 
9CC* 


X9X1 
9c94 


X947 

9c9r 


X9A.4 
9C09 


'X97i^ 


9el>* 


XTAA 


7 




9**0 


XA7A 
9* >U 


XA7A 
9* 'O 


9*07 


9*70 


99v3 


V401 


99»T 


XJL1 X 
9049 


XJk91 
9DC4 


90*9 


X&4X 
9099 


900* 


90 'C 


17tt9 

* 'PC 


9 tw^ 


XJIA7 

90V • 


Xil9A 
90cU 


XA90 

90C7 


XAXA 

9090 


XAA4 


900c 




9t*OC 


X07A 

9tF • W 


970* 


AAAA 


AAAA 


An9^ 
*Wc* 


*W9C 




*9CC 


A4X1 
*994 


A4AA 
*9*W 


A44X 
*999 


A4&9 
*9CkC 


*9 /9 


A 7A 1 
* '*! 






*70t 


4AA1 


340 r 


41 7iL 
94 rO 


41 AQ 


41 OO 

9177 


99UO 


441 0 


44XA 

999V 


9049 


9Dc* 


4&XA 
909U 


C79C 


47X4 
9 ' 99 




4fl4S 
9Q99 




4AAA 

900U 


4AAik 
9000 


4JI09 
D07C 


40AA 
9^WA/ 


4Q91 
J7i 1 


OW9 


J>A1 1 
OV44 


&A1 7 
Ov4 > 


OUc9 


ow*o 


OW9* 




&/V^A 
OvOO 




&1 7<l 
04 r O 


<11 AX 
0409 


tit OX 
0479 


090c 


D9' 4 


&VAA 


0*7l 


6811 


6990 


6999 


7008 


7019 


7028 


7040 


7169 




1 AAX 


1 A70 


1 AAT 


1 A04 
4W9 


1 1 AX 
44U9 


1119 
444c 


1 Ic 1 


1 XM 


1 XI A 
494* 


1 X97 
49C' 


1 XXA 
499* 


1 XA1 
49*4 


1 XiLA 
490* 


1 X71 
19*4 


1 XA1 
1904 




147A 

49 'O 


1&1& 
4040 


1&9X 
10c9 


4«9c 


1 J14A 
4090 


1&A4 


107C 




IMM 
40W9 


1 A1 X 

4049 


1 A9A 
lOcV 


1 AXA 

4a9V 


1 A4A 

4090 


1 AJL4 


1 A7X 

lO ' 9 


10(t7 


4V09 


lOOX 
4W9 


9AA1 
CW4 


9ftalA 
cUVO 


9A1 A 

CU40 


cv*o 


9.^4 
CV99 


91 


91JIO 
<40t 


91 7<L 
s4 fO 


91 AJ> 


9911k 
CC4D 


999 X 
CCC9 


9990 
cee7 


99Xi« 
CC 90 




9X41 
<994 


9XA9 
C90C 


9X79 
C9 >c 


9XAA 
C90* 


9AX7 
C*9 1 


9AA4 

e**9 


9A4A 
C*9* 


9<X71 
b3 ' 1 


94AA 

s90V 


94AO 


9&AA 


9il4A 
C09U 


9&47 
C09 ' 


COO* 


9<;74 
CO i 9 


9M94 


COf 4 


9A7A 

cO rO 


9AAA 


90A<1 


901 9 
C74c 


9099 
c*Vc 


90A4 

C7*9 




XAA9 
9U*(: 


9v09 


XA79 
9U '< 


XAOA 
9W7* 


Xl AA 
94 W 


XI AA 

91VO 


XI XI 

9191 


<91 X 


9ce* 


X9X1 
9c94 


X947 
9c9 ' 


X9&4 
9c09 


9c 'O 


9cO* 


XXi'^A 




XAXX 

9*99 


9**0 


XA7A 
9* f U 


XA7A 
9* r O 


XAA4 

9*07 


XAOA 


X4A4 

99vj 


S591 


S599 


S613 


3621 


S645 


S6S3 


3664 


36 "'2 





ARf Ms 






IS MAR 


A4 1 


1 f^ • Sft PAf.F 


ID V 


KOJllA.MAC 


15 MAR -84 


15:51 




CROSS 


REFERENCE 


TABLE 




3699 


3713 


3736 


3744 


3757 


3766 


3773 




5870 


3683 


3894 


3900 


3906 


593«? 


3940 




4112 


4124 


4323 


4332 


4341 


4354 


4363 




4750 


4759 


4 7 72 


4781 


4 793 


4949 


4958 




5208 


5219 


5230 


5467 


5476 


5485 


5499 




5744 


5755 


5764 


5776 


5796 


5802 


5526 




5927 


5933 


5941 


5964 


5970 


5976 


5964 




e089 


6095 


6101 


6109 


6132 


6136 


6144 




6500 


6509 


f>758 


6767 


6776 


6790 


6799 




7176 


7185 












ESCAPE 


294« 














rPP IMS 


883« 


886 












FPPSMS 


1040« 


1043 












FRONT 


1« 














FRONTl 


1« 


156* 












GETPRI 


294« 














GETSUR 


294« 














lOMSG 


7195# 


7205 












MULT 


294* 














NEUTST 


159* 


294* 


884 


1041 


1152 


1182 


1215 




1717 


1770 


1838 


1898 


1965 


2026 


2095 




2770 


2858 


2892 


2929 


2973 


3015 


5049 




S6S0 


3680 


3720 


5916 


4040 


4154 


4582 




5841 


5867 


5908 


5949 


5992 


6055 


6076 


POP 


294« 


7406 


7606 


7607 








PUSH 


294« 


7365 


7567 


7569 


7590 






REPORT 


294« 














SCOPE 


189« 














SETPRI 


294« 














SETTRA 


7520* 


7545 


7554 


7555 


7556 


7557 




SETUP 


1S9« 


294* 












SKIP 


294« 














SLASH 


294« 














SPACE 


294« 














STARS 


294« 


501 


511 


513 


520 


546 


884 

WW^ 




1185 


1216 


1218 


1262 


1264 


1549 

* W^ » 


1551 

m w^ A 




1659 


1641 


1666 


1668 


1718 


1720 

A " BW 


1771 




2029 


2094 


2096 


2149 


2151 


2194 


2196 

WaW VW 




2633 


2635 


2684 


2686 


2771 


2775 


28SA 




3015 


3049 


5051 


3079 


3061 


5115 


5117 

W4kA • 




3381 


S383 


545S 


S457 


5650 


5652 

>#Wi#fa 


5680 




4136 


4382 


4384 


4581 


4583 


4800 

^ WWW 


^W*rC 




5784 


5786 


5810 


5812 


5841 

•#W ■ & 


5845 


5867 




6035 


6076 


6078 


6117 


6119 

W A A 7 


6160 

w*ww 


6162 

WwWK 




7049 


7051 


7090 


7092 


7198 

V A7W 


7248 

* S^W 


7SS5 


SkKtSU 


294« 


843* 













TAIL 1* 7195 

TRMTRP 7542* 

TTPBIN 294* 

TrPOEC 294* 7218 

TTPNAM 294* 

TrPNUn 294* 

TTPOCS 294* 

TYPOCT 294* 

TrPTXT 294* 

KESCA 294* 

















SEQ OK 


MACRO 


NAMES 












5 fOd 


5 f 


380 7 


5620 


3629 


3636 


3845 


3862 




5962 


5970 


3964 


4000 


4006 


4024 


4052 


A X 7 A 
HOI'* 


4522 


4551 


4540 


4553 


4562 


4573 


4741 


^*»0 1 


il OB/\ 




C/\A « 

5001 


5167 


5176 


5185 


5199 




5519 


5550 


5615 


5624 


5631 


5726 


5735 


CO V T 


cod 


COCA 

5859 


5880 


5666 


5892 


5900 


5921 


OUUO 


6011 


oOl 7 


6025 


6046 


6054 


6060 


6066 




ol »o 




6193 


6362 


6371 


6380 


6491 


6811 


6990 


6999 


7006 


7019 


7028 


7040 


7169 


1261 


1340 


1300 


1456 


1527 


4 CAO 

1598 


4 £ V a 

1638 


1665 


2148 


2193 


2254 


2302 


2417 


2525 


2632 


2683 


SAT A 

SO 7^ 


S4 4 C 

3115 


3153 


3299 


V ^ A^ 

3292 


3342 


3381 


3455 


4581 


4800 


5008 


5241 


5558 


5640 


5784 


5810 


6117 


6160 


6202 


6588 


6518 


6820 


7049 


7090 




AO 4 


1041 


1043 


• Aa V 

1047 


1159 


• « CC 

1155 


1183 






4 AW 

1457 


1459 


1528 


1550 


1599 


1601 


1775 




4 BA 4 

1841 


1899 


1901 


1966 


1968 


2027 




22^7 


2905 


2905 


2418 


2420 


2526 


2528 






2894 


2929 


2991 


2973 


2973 


VA« V 

5013 


5135 


9159 


9239 


9241 


3292 


3294 


3342 


wa ii 

3344 


WK 


9720 


9722 


9916 


9918 


4040 


A Aa 

4042 


4134 


5Q0o 


5010 


5241 


5245 


CC VA 

5598 


CC a A 

5540 


5640 


5642 






5910 


5949 


5951 


5992 


5994 


6033 


6202 


6204 


6988 


^ VAA 

6990 


xc • a 

6518 


6520 


6820 


6822 




7AOQ 


' 30c 


7&1 7 
•Ol f 











GLOBAL AREAS 
KDJllA.MAC 



15 -MAR -84 15:51 



«*NEUT 


294» 


884 


1041 




1771 


1839 


1899 




265d 


2892 


P929 




3660 


3720 


3916 




5867 


5908 


5949 


$$SET 


7526# 


7545 


7554 


SJSETM 


859« 


866 




$$SKIP 


294« 






.EQUAT 


159* 


184 




.HEAOE 


16 1# 


166 




.KTll 


159* 


294 




.SPTUP 


161« 


471 




. JACTl 


161» 


499 




. $APTB 


159* 


544 




. $APTH 


161« 


509 




. $APTY 


162« 


7560 




.»EOP 


159* 


7196 




. $ERRO 


162* 






. $REAO 


162* 






. $TRAP 


161* 


7497 




. $TYPO 


160* 


7353 




. J TYPE 


160* 


7246 




. »TYPO 


162* 


7420 




. $40CA 


159* 


472 




. A8S. 


040234 


000 




ERRORS 


OETECTEO 


: 0 





15 MAR 


-84 


16:58 PAGE 


167 














TABLE - 


- MACRO 


NAMES 




1153 


1183 


l.?16 


1262 


1349 


1389 


1457 


1966 


2027 


3094 


2149 


2194 


2255 


2303 


2973 


3013 


3049 


3079 


3115 


3153 


3239 


4040 


4134 


4382 


4581 


4800 


5008 


5241 


5992 


6033 


6076 


6117 


6160 


6202 


6388 


7555 


7556 


7557 











CZKDLB /EN : A8S . CZKDLB . SEQ/CRF /DOC/SOL/r«. : TOC "SYSHAC . SML /ML . C2K0LB . HAC/ML , KO Jl lA . HAC 

RUN -TIME: 249 141 10 SECONDS 
RUN TIME RATIO: 539/400-1.3 
CORE USED: 52K C103 PAGES) 



DOCUMENT PAGES: 165 



1528 
2418 
3292 
5558 
6518 



1599 
2526 
3342 
5640 
6820 



1639 
2633 
3381 
5784 
7049 



1666 
2684 
3455 
5810 
7090 



SEQ 0165 



1718 
2771 
3650 
5841 



